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1.0 INTRODUCTION 

TH8 M8053 ANO M8064 ARE SINGLE -LINE SYNCHRONOUS, MICRO 
PROCESSOR BASED COMMUNICATIONS INTERFACES WHICH CAN SUPPORT 
BOTH CHARACTER-ORIENTED CDDCMP, BSC. ETC.) AND BIT-ORIENTED 
(SDLC, HDLC. ETC.) PROTOCOLS. THE PURPOSE Of THIS PROGRAM IS 
TO PERFORM STATIC DIAGNOSTIC TESTING OF THE VIA, FIFO, 
ANO USYRT CBCP/BOP MOOES) ON THESE BOARDS. THE FOLLOWING 
FUNCTIONS WILL BE PERFORMED: VRC/CRC ERROR DETECTION 
ANO ASSORTED BOP SPECIFIC FUNCTIONS (BIT STUFFING, ABORTS, 
FLAGS, SECONDARY STATION ADDRESSING, ETC). 

THE STATIC LOGIC TESTS WILL PROVIDE EXTENSIVE 
TROUBLESHOOTING CAPABILITIES, SUCH AS TIGHT SCOPE LOOPS, 
SWITCH OPTIONS. ANO ABILITY TO "LOCK" ONTO INTERMITTENT 
ERRORS. IN ADDITION TESTS ARE DESIGNED AND STRUCTURED 
TO ACHIEVE MAXIMUM FAULT RESOLUTION AND FACILITATE 
REPLACEMENT OF THE SMALLEST FIELD REPLACEABLE UNIT. 

THIS PROGRAM IS IMPLEMENTED USING THE DIAGNOSTIC SUPERVISOR 
AND A STRUCTURED PROGRAMMING APPROACH. BECAUSE THE DESIGN 
CONFORMS TO THE SUPERVISOR (STANDALONE VERSION) THE PROGRAM 
IS COMPATIBLE WITH ACT, APT. XXDP*, AND SLIDE. 

THROUGH DIALOGUE WITH THE OPERATOR, THE PROGRAM ALLOWS 
MODIFICATION OF DEVICE PARAMETERS, SUCH AS LSI -BUS ADDRESS, 
VECTOR ADDRESSES AND DEVICE PRIORITY. IN ADDITION, THE 
OPERATOR CAN SPECIFY PARTICULAR TESTS TO BE RUN ANO A 
VARIETY OF LOOPING, RUNNING. ANO REPORTING MOOES. 

DEVICE ERRORS WILL BE REPORTED AS THEY OCCUR. THE REPORT 
WILL INCLUDE A TEST NU1BER AND DESCRIPTION 0* THE ERROR, 
GOOO ANO BAD TEST DATA. ANO APPLICABLE DEVICE REGISTER 
CONTENTS. 

2.0 HARDWARE REQUIREMENTS 

THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE M8053/8064 STATIC 
LOGIC TESTS: 

SBC-U/21* 

16K WOROS OF MEMORY 

CONSOLE TERMINAL 

M8053 OR M8064 COMMUNICATIONS INTERFACE 

3.0 PRELIMINARY PROGRAM REQUIREMENTS 

THIS PROGRAM ( CNDMD ) SHOULD BE THE FOURTH OF THE FIVE UMV~11 
STATIC DIAGNOSTICS TO BE RUN ( CNDMA/B/C SHOULD BE RUN FIRST ). 
ERRQRS FOUND IN THIS PROGRAM SHOULD BE CORRECTED BEFORE RUNNING 
THE FINAL LINE UNIT DIAGNOSTIC CCNQME). 
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4.0 GENERAL. PROGRAM CONSIDERATIONS 



4.1 DIAGNOSTIC SUPERVISOR 

THIS PROGRAM IS COMPATIBLE WITH THE S f AND ALONE DIAGNOSTIC 
SLPERVI50R, ANO MUST BE LOADED TO BE CO-RESIDENT WITH THE 
SLPERVISOR. OR BE PREVIOUSLY COMBINED WITH THE SUPERVISOR 
AMD LOADED AS A SINGLE FILE, IN EITHER CASE, THE COMBINED 
PROGRAM WILL NOT EXCEED 16K OF MEMORY. 

4.2 EXECUTION TIME 

THE MAXIMUM TIME REQUIRED TO RUN THIS PROGRAM IS ABOUT 35 
SECONDS PER PASS FOR EACH UNIT, 



4.3 xxty • 

THIS PROGRAM MAY BE LOADED UNDER XXDPt, AND MAY BE RUN IN 
DUMP MODE Oft CHAIN MODE. 

4.4 ACT/SLIDE 

THIS PROGRAM MAY BE LOAOED LADDER ACT OR SLIDE ANO MAY BE RUN 
IN DUMP MOOE OR CHAIN MODE. 



4,5 APT 

THIS PROGRAM MAY BE LOADED BY THE APT SYSTEM 
APT-RD) AND RUN IN PROGRAM MOOE OR SCRIPT MODE, 



( INCLUDING 



4.6 MEMORY MANAGEMENT 

MEMORY MANAGEMENT IS NOT UTILIZED IN THIS PROGRAM. 

4.7 ERROR LOGGING 

AT THE ENO OF EACH PASS ON ALL UNITS. THE PROGRAM PRINTS OUT 
THE C***JLATIVE TOTAL NU1BER OF ERRORS SINCE THE LAST START OR 
RESTART COMMAND. 

5.0 PROGRAM LOA^ MEDIA 

THIS PROGRAM CAN BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER OR FROM ACT. SLIDE, OR APT SYSTEMS. OR FROM 
ANY MEDIA SUPPORTED BY XXDP». WHEN USING THE PAPER TAPE 
ABSOLUTE LOADER, THE PROGRAM SHOULD BE LOADED FIRST, 
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR. WHEN USING XXDP>. THE 
DIAGNOSTIC SUPERVISOR SHOULD BE LOADED FIRST, FOLLOWED BY 
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THE DIAGNOSTIC PROGRAM, 



6.0 OPERATING INSTRUCTIONS 



6.1 LOADING ANO STARTING PROCEDURES 



6.1.1 LOADING PROCEDURES 

THIS PROGRAM MAY BE LOADED FP )M PAPER TAPE USING THE 
ABSOLUTE LOADER. IT MAY ALSO B ; LOADED FROM ANY XXDP» LOAD 
MEDIA. WHEN LOADED LNOER XXDP*, THE DIAGNOSTIC SUPERVISOR 
WILL BE LOADED AUTOMATICALLY. 



SEQ 0006 



6.1.2 STARTING PROCEDURES 

THE PROGRAM STARTS AT LOCATION 
PROCEDURES TO START THE. PROGRAM. 



200. USE STANDARD DEC 



6.1,3 STEPS FOR QUICK AND SIMPLE EXECUTION 

THE DIAGNOSTIC CAN BE EXECUTED STANDALONE UNDER XXDP*. 
WITHOUT READING THE REMAINDER OF THIS DOCUMENT. AS FOLLOWS: 

A) LOAD ANO START DIAGNOSTIC USING RUN COMMAND 

B) RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION ANO PROMPT (DRS-CO 

C) ENTER STA<CR> 

D) ANSWER HARDWARE ANO SOFTWARE QUESTIONS 

E) GET END ri PASS MESSAGES OR ERROR MESSAGES 

F) TO ENO f .fcCUTION, ENTER CONTROL/C 

6.2 INITIAL DIALOGUE 

AFTER THE PROGRAM ANO THE SUPERVISOR ARF LOADED ANO THE PROGRAM 
IS STARTED. THE FOLLOWING IDENTIFICATION IS TYPED : 

DRS LOADED 

DIAG. RUN-TIME SERVICES 

CNDTO-A-0 

DMV-tl LINE UNIT TESTS - PART 2 OF 3 

UNIT IS M6053 OR M8064 

DR> 

THE OPERATOR THEN PROCEEDS BY TYPING ONE OR MORF OF THE 
COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3. (FOR MORE 
DFTAILFD INFORMATION. REFER TO THE DIAGNOSTIC SUPERVISOR 
FUNCTIONAL SPECIFICATION), 



6.5 PROGRAM OPTIONS 
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6.5.1 START COMMAND 

*♦*♦*♦♦*♦♦♦♦♦♦* i,***************************.**************.** 

5TA(R T )/ TESTS: < TE ST - L IS T> /PASS :<PASS-CNT> /FLAGS: 
<HAG-LIST>/EOP:<INCR> 

* * * * * i ************* i * A ******** i * A ************** 4 ********** * 



6.3.1.1 TESTS SWITCH ( /TESTS: < TEST -LIST> ) 

<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR 
RANGES OF DECIMAL NUMBERS (1-5:8-10 ETC.) THAT SPECIFY THE 
TEfTS TO BE EXECUTED. THE NUMBERS ARE SEPARATED By COLONS. 
THE MJMBERS RANGE FROM 1 TO THE LARGEST TtST NUMBER IN THE 
DIAGNOSTIC. THEY MAY BE SPECIFIED IN ANY 0«DER. TESTS WILL 
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF THE ORDER Of 
SPECIFICATION. THE DEFAULT IS TO EXECUTE ALL TESTS. ON 

THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE PUNCTUATION 
USED IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY THC 
OPERATOR. SEE EXAMPLE AT END OF 6.3.1,5. 

6.5.1.2 PASS SWITCH ( /PASS: <PASS -CNTO 

<PASS CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER 
OF PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL 

DIAGNOSTIC (ALL SELECTED TESTS) AGAINST AIL UNITS SUBMITTED. 
THE DEFAULT IS NON-ENDING EXECUTION. IN THIS CASE EXIT FROM 
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C OR 
OCCURAJ.CE OF AS ERHOR WITH THE HALT ON ERROR FLAG BEING 
THE EXIT IS A RETURN TO COMMANO MODE. SEE EXAMPLE AT 



SEQ 0007 



BY 

SET 

ENO OF 6.3.1.5. 



6.3.1.3 FLAGS SWITCH ( /FLAGS: <F L AG -LIST* ) 

<FLAG-LIST» IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>. 
<FLAG-1>, OH <FLAG-0>. SEPARATED BY COLONS, WHERE <FLAG> HAS 
ONE OF THE FOLLOWING VALUES: 

HOE HALT ON ERROR, CAUSING COMMANO MOOE TO BE 
ENTERED WHEN AN ERROP IS ENCOUNTERED 

LOE LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP 
CONTINUOUSLY UIlrilN THE. SMALLEST DEFINED BLOCK 
OF COOING (SEGMENT, SUBTEST, OR TEST) CONTAIN- 
ING THE ERROR 

IER INHIBIT ERROR REPORTING 

IBE INHIBIT BASIC ERROR REPORTS 

IXE INHIBIT EXTEH)ED ERROR REPORTS 

PRI DIRECT ALL MESSAGES TO A LINE PRINTER 

PNT PRINT NUMBER OF TEST BEING EXECUTED 

BOE BELL ON ERROR 

UAM RUN IN UNATTENDED HOOE , BYPASSING MANUAL 
INTERVENTION TESTS 

ISR INHIBIT STATISTICAL REPORTS 

IDU INHIBIT DROPPING OF UNITS BY DIAGNOSTIC 

LOT LOOP ON TEST 
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5EQ 0008 



THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATEO TO 
ARE CLEARED. A FLAG NOT SPECIFIED IS CLEARED, IF THE FLAGS 
SWITCH IS NOT GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT 
END 0^ 6.3.1.5. 

6.3.1.4 F.4D OF £>ASS SWITCH f /EOP ; < INCR> ) 

<INCR^ IS .* DECIMAL NLH6ER INDICATING HOW OFTEN C IN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE 
PRINTED. THE DEFAULT IS AT THE END OF EVERY PASS. SEE 
EXAMPLE AT END OF 6.3.1.5. 



6.3.1.5 EFFECT OF START COMMAND 

THE EFFECT OF THE START COMMANO IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE, ANO 
THEN THE DIAGNOSTIC TESTS THEMSELVES. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION 
"* UNITS?" TO WHICH THE OPERATOR REPLIES WITH A DECIMAL 
NUMBEW N FROM 1 TO IK. THE TERM "UNIT" REFERS TO THE DEVICE 
TO WHICH THIS SERICS OF DIAGNOSTICS IS DEDICATED. FOLLOWING 
THIS ARE THE QUESTIONS WHEREBY THE P-TA8LES THEMSELVES WILL 
BE BUILT. EACH P-TABLE IS A CORE-RESIDENT TABLE CONTAINING 
ALL THE HARDWARE INFORMATION FOR ONE UNIT. THE OPERATOR 
MUST SUPPLY N (NLf«£R OF UNITS) VALUES FOR EACH QUESTION. 
HE MAY DO THIS BY GIVING ONE ANSWER TO EACH QUESTION (IN 
WHICH CASE 1HE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR 
BY GIVING N VALUES, SEPARATED BY COMMAS. TO EACH QUESTION 
(SERIES WILL BE POSED ONCE). EACH QUESTION IS FOLLOWED BY 
THE RESPONSE RADIX CD FOR DECIMAL, B FOR BINARY, FOR 
OCTAL, L FOR YES/NO) IN PARENTHESES AND THE DEFAULT VALUE 
AFTER THE PARENTHESES. 

FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS 
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE MODE (QUICK 
VERIFY ETC.) THAT THE DIAGNOSTIC WILL EXECUTE IN. 

WHEN THE QUESTION "♦ UNITS?" IS ANSWERED. ME.iORY STORAGE IS 

ALLOCATED FOR THE P- TABLES, ANO IF THERE IS NOT ENOUGH TO 

ACCOWOOATE THEM THE MESSAGE "TOO MANY UNITS" IS ISSUED. IN 

THIS CASE Tf£ DIAGNOSTIC MUST BE EXECUTED MORE THAN ONCE TO 
TEST ALL UNITS, 

EXAMPLE: 

STA/T£STS:1:2 4:6:8- 10/PASS: 3/FLAGS: IERjHOE-1 :UAM:LOE 

r HlS COMMAND WILL CAUSE THREE PASSES TO BE MADF , EACH PASS 
CONSISTING OF t ES TS 1,2,3 4,6,8,9, ANO 10 EXECUTED AGAINST 
ALL UNITS. THERE IS NO DIFFERENCE BETWEEN SAYING <Fl.AG> ANO 
SAYING <FLAG-1>. THE NOW ION <FLAG-0> IS MEANINGFUL ONLY ON 
A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS 
PREVIOUSLY SET. NOTE THAT ON ALL COMMANDS ONLY THE FIRST 
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THREE LETTERS ARE SCANNED, 

6.3.2 RESTART COMMAND 

RESC TAR TVTESTS:< TEST -LIST >/PASS:<PASS-CNT> /FLAGS: 
< FLAG -LIST > /UNI TS:<UNIT -LIST > 

6.3.2.1 TESTS, PASS, AND FLAGS SWITCHES 

< TEST -LIST* . <PASS-CNT>, AND <FLAG-LIST> ARE AS IN THE START 
COMMAND. 

6.3.2.2 UNITS SUITCH ( /UNITS: <UNIT -LIST> ) 

<UNIT-LI3T> IS A 3EQUENCE OF DECIMAL NUMBERS CO.l ETC.") OR 
PANGES OF DECIMAL NUMBERS (0-5, 8-10 ETC.) THAT SPECIFY THE 
UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. 
THE NUMBERS MAY RANGE FROM THRU N-l (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COMMANO). THE NUMBER 
INDICATES THE POSITION OF THE P-TABLE AS THE DATA UAS 
ENTERED DURING THE HARDWARE DIAGLOGUE. THE UNITS WHICH ARE 
SELECTED MUST NOV HAVE BEEN DROPPED BY THE DROP COMMAND, 
SEE THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
IS TO TEST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY A DROP 
COMMAND. 

6.5.?. 3 EFFECT OF RESTART COMMAND 

THE RESTART COMMANO DIFFERS FROM THE START COMMAND IN THAT 
THE P-TABLES FROM THE PREVIOUS START COMMAND C TtCRE MUST 
HAVE BEEN ONE ) ARE USED, INSTEAD OF NEW ONES BEING BUILT. 
THE UNITS SWITCH GIVES THE ABILITY TO SELECT A SUBSET OF 
THESE. THE SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED 

(OPERATOR WILL BE ASKED). THE COMMANO CAN BE USED AFTER 
COMMAND MOOc HAS BEEN REENTERED IN ANY OF THE THREE NORMAL 
WAYS: A) THE REQUESTED NUMBER OF PASSES HAVE BEuN MADE B) 
AN ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET C) 
A CONTROL/C WAS ENTERED BY THE OPERATOR. 

6.3.3 CONTINUE COMMAND 



CONCTINUE VFASS: <PASS-CNT /FLAGS :< FLAG -LIT, T> 



************ 



******** 



6.3.3.1 PASS SWITCH C /PASS : <PASS -CNT> ) 

<PASS CNT> IS SAME AS IN START COMMANO. BUT THE DEFAULT IS 
THE UNSATISFIED PASS-CNT FROM THE PREVIOUS START OR RESTART. 
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IF NONE REMAINS, THE DEFAULT IS NON -ENDING EXECUTION. 



6.3.3.2 FLAG SWITCH ( /FLAGS: <Fl AG-LIST> ) 

<H.AG-LIST* IS SAME AS IN START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THf.IR CURRENT VALUE . 

6.3.5.3 EFFECT OF CONTINUE COMMAND 

CONTINUE MUST FOLLOW A START OR RESTART, ANO COMMANO MODE 
MUST HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A 
CONTROL/C. THE EFFECT OF THE COHMANO IS TO GO TO THE 
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE HALT 
OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED. HARDWARE PARAMETERS r»*Y NOT BE CHANGED. 

6.3.4 PROCEED COMMANO 

♦♦ft***************************************************** • .. * 
PROCCEEDVFLAGS: 'FLAG -LIST > 

******* + *******************,<<******************************* 



SEQ 0010 



6.3.4.1 FLAGS SWITCH ( /FLAGS: <FLAG-LISTO 

<FLAG-LIST> IS AS IN THE START COMMAND, 
FLAGS RETAIN THEIR CURRENT VALUE. 



BUT UNSPECIFIED 



6.3.4.2 EFFECT OF PROCEED COMMANO 

PROCEED MUST FOLLOW A START, RESTART. OR CONTINUE. COMMANO 
MOOE MUST HAVE BEEN ENTERED VIA A KALT ON ERROR. THE EFFECT 
OF THE COMMAND IS TO BEGIN EXECUTION AT THE LOCATION 
FOLLOWING T>€ ERROR GILL. NEITHER HARDWARE NOR SOFTWARE 
PARAMETERS MAY BE ALTr.REO. 



6.3.5 ADO COMMAK) 



ADO/UNITS:<UNIT-LIST> 

******** *************************************************** 



6.3.5.1 WITS SWITCH ( , UNITS: <UNIT LIST> 
<UNIT LIST* IS AS IN THE RESTART COMMANO. 

6.3.5.2 EFFECT OF ADD COMMAND 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCF . [.hLH 
UNIT MUST HAVE A P -TABLE IN MEMQRt OCC 10 AN EARLIER 
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509 

510 

511 

51? 

513 

514 

515 

M6 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

52 7 

528 

529 

530 

531 

532 

533 

534 

535 

53* 

537 

538 

539 

540 

541 

542 

543 

544 

545 

546 

547 

543 

549 

550 

551 

552 

553 

554 

555 

556 

b-j/ 

558 

J59 

560 

561 

562 

563 

564 

565 
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HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED BY A 
RESTART OR CONTINUE.. THE UNITS SWITCH ,'IUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 

6.3.6 DP3P COMMAND 

*****************************************444444444**4*444*4 

DROC P)/UNITS:< UNIT -LIST » 

******* > *, ♦*************************************4********** 

6.3.6.1 UNIT5 SWITCH (/UNITS : <UNIT -LIST > ) 
<UNIT-LIST> IS AS IN THE RESTART COMMAND, 

6.3.6.2 EFFECT OF DROP .OMMAND 

THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR STARl 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 

6.3.7 PRINT COMMANO 

*********************************************************** 

PFICNT) 

*********************************************************** 



Sfc'Q O011 



6.3.7.1 EFFECT OF PRINT COMMAND 

THE. TOTAL ,A*1BE& OF ERRORS FOR EACH UNIT 
START OR * START COMMAND ARE PRINTED. 
STATISTICAL SPORTING) FLAG IS CLEARED. 



SINCE THE LAST 
THE ISR (INHIBIT 



6.3.8 DISPLAY COMMAND 

********* ********** 4***4******4******************** ****** 4 4 

DIS(PLAY)/UNITS:<LNIT-LIST> 
*********************************************************** 



6.3.8.1 UNITS SWITCH C /UNITS :<UNIT LIST >) 
<UNIT-LIST> IS AS IN THE RESTART COMMAND, 

6 3.8.2 EFFECT OF DISPLAY COMMANO 

THE HARDWARE P-TABLE5 FOR ALL UNITS UNOER TEST ARE PRINTED 
OUT IN THE FORMAT IN WHICH THEY WERE ENTERED. ANY UNITS 
THAT WERE DROPPED St THE OPERATOR "OPOP** COMMANO ARE SO 



A ■'. 
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566 
56/ 
568 
569 
570 
571 
57^ 
•575 
574 
575 
576 
577 
578 
579 
580 
581 
582 
583 
584 
585 
586 

58 7 
588 
589 
590 
591 
592 
593 
594 
595 
596 

59 7 
598 
599 
600 
601 
602 
t>03 
604 
605 
606 
60/ 
608 
609 
610 
611 
612 
613 
614 
615 
616 
63 7 
618 
619 
620 
621 
622 



SEQ 0012 



DESIGNATED. 



6.3.9 FLAGS COMMAND 

************ A********************************************** 

FLA(GS) 

********************** 4*******************4 ******* \ ******** 



6.3.9.1 EFFECT OF FLAGS "JMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 

6.3.10 ZFLAGS COMMAND 

!>*******************************. * ^.* *********************** 

ZFL(AGS) 

************ ********************************& ************** 

6,3,10.1 EFFECT OF ZFLAGS COMMAND 
ALL FLAGS ARE CLEARED. 

6.5.11 CONTROL CHARACTERS 

A CONTROL C (C) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC CAUSES 
A RETURN TO COMMAND MODE. 

A CONTROL Z (Z) ENTERED DURING ONE OF THE THREE OPERATOR 
DIALOGUES- HARD CORE QUESTIONS (SEE 6.2) .HARDWARE DIALOGUE 
(SEE 6.3,1.5). OR SOFTUARE DIALOGUE (SEE 6.3.1.5) CAUSES THE 
DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

A CONTROL (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC 

CAUSES ALL TELETYPE OUTPUT TO BE SURPRESSED FOR THE 

REMAINDER OF THE DIAGNOSTIC OR t*JTIL ANOTHER IS TYPED, 

WHICH RESTORES NORMAL TELETYPE OUTPUT . 

6.3.12 HARDWARE PARAMETERS 

THE FOLLOWING 3 QUESTIONS WILL BE ASKED ON A START COMMAND. 
THE VALUE LOCATED TO THE LEFT OF THE QUESTION MARK IS THE 
DEFAULT VALlfc THAT WILL BE TAKEN ON A CARRIAGE RETURN 
RESPONSE. 

J. DEVICE CSR ADDRESS : (0) 160020? 

THIS IS THE ADDRESS AT WHICH THE CSR REGISTERS (SELO^ RESIDE 
ON THE LSI -BUS. THE ALLOUABLE RANGF IS 160020-177760 
(OCTAL), AND THE DEFAULT VALUE IS 160020, 



2. 



DEVICE VECTOR ADDRESS 



(0) "■ * ? 
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6cT5 

624 

62b 

626 
6.77 
6 2d 
b29 
h30 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
6*4 
6 -5 
646 
64 7 
648 
64 9 
650 
651 
65? 
653 
654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
668 
669 
670 
6/1 
672 
673 
674 
675 
6 76 
677 
6/8 
67Q 
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THIS IS THE ADDRESS OF THE INPUT INTERRUPT VECTL, FOR TCT.G 
DEVICE. THE ALLOWABLE RANGE IS 000-674 (OCTAL), AND 1 HE 
DEFAULT VALUE IS 300. 



3. 



DEVICE PRIORITY LEVEL 



(0) 4 ? 



TMTS IS THE CPU PRIORITY AT WHICH CHE INTERRUPT HANDLERS OF 
THIS DEVICE WILL BE EXECUTED. THE ALLOWABLE RANGE IS 0-7, 
AND THE DEFAULT VALUE IS 4. 



6.3.13 SOFTWARE PARAMETERS 

NO SOFTWARE PARAMETER QUESTIONS ARE ASKED Br PART 1 OF THE 
STATIC LOGIC TESTS. 

6.3.14 EXTENOED DISCUSSION OF P-TABLE DIALOGUE 

THE FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY 
THE FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY. 

AS SOON AS THE QUESTION "9 UNITS?" IS ANSWERED (WITH THE 
NUMBER N, SAY) SPAC r IN CORE IS ALLOCATED FOR N P TABLES. 
ALL OF THE P-TABLES ARE OF THE SAME: FORMAT, AND THERE IS A 
ONE TO ONE CORRESPONDENCE BETWEEN THE HARDWARE PARAMETER 
QUESTIONS AND THE SLOTS IN THE P-TABLE FORMAT, 



ON THE FIRST TRIP THRU THE QUESTIONS, A^L OF THE SLOTS IN 
ALL OF THE P-TABLES ARE FILLED. IF THE OPERATOR TYPES IN 
LESS THAN N EXPLICIT VALUES IN RESPONSE TO A PARTICULAR 
QUESTION. THESE VALUES ARE PLACED IN THE P-TABLES CONE VALUE 
GOING INTO THE PROPER SLOT OF EACH P-ThBLE BEGINNING WITH 
THE FIRST P-TABLE) L*TIL THE STRING OF VALUcS IS EXHAUSTED. 
THE LA<;T VaLUE IN THE STRING BECOMES TKE NEW DEFAULT AND IS 
USED TO F T |.L THAT SLOT IN THE REMAINING P-TABLES. 

ON SUBSEQUENT TRIPS THRU THE QUESTIONS, 1HE SAME PROCESS IS 
CARRIED OUT, EXCEPT THAT THE EARLTEST P-TABLE NOT TC HAVE 
RECEIVED AN EXPLICIT VALUE IN ANY OF ITS SLOTS NOW AS FUMES 
THE ROLE THAT TABLE NUMBEP ONE PLAYED IN THE FIRST TRIP, 

THE SERIES OF QUESTIONS IS REISSUED UNTIL AT LEAST ONE 
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM ') HE OPERATOR, 

IN GIVING A STRING OF VALUES, COMMAS WITHOUT INTERVENING 
VALUES MAY BE USED TO INDICATE A REPETITION OF THE LAST 
NAMED VALUE. 

A STRING OF VALUES MAr BE GIVEN AS A RANGE 16 10 *• OR 
EXAMPLE). IF THE VALUES REPRESENT PURE NUMERICAL DATA. THIS 
SAMPLE RANGE TRANSLATES TO Th* STRIN. 6,/, 8. 9, 10 (AN 
INCREMENT OF 1 ) . IF THE VALUES ARf ADDRESSES. THE SAMPLE 
RANGE TRANSLATES TO THE STRING 6,8.10 (AN INCREMENT OF <>). 



SEQ 0013 



f.V 
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680 NOW LET US SEE HOW WE COULD USE THESE CAPABILITIES TO 

651 CONSTRUCT A SET OF P-TABLES. ASSUME THAT WE HAVE 16 UNITS, 

682 AND THAT THERE ARE THREE HARDWARE PARAMETERS FOR EACH (THREE 

683 SLOTS IN THE P- TABLE, THREE HARDWARE QUESTIONS IN THE 

684 DIALOGUE). LET THE DESIRED VALUE TOR THE FIRST PARAMETER BE 

685 THE NUMBER 75 FOR ALL 16 TABLES, LET THE DESIRED VALUE FOR 

686 THE SECOND PARAMETER BE FQUAL TO THE UNIT NUMBER 
^87 (0,1,2 15) EXCEPT FOR UNIT 12, WHICH SHOULD RECEIVE THE 

688 VALUE 11. LET THE DESIRED VALUE FOR THE THIRD PARAMETER BE 

689 THE NUMBER 76 FOR THE FIRST 7 UNITS AND THE NUMBER 77 FOR 

690 THE LAST 9 UNITS. 
691 

692 THE FOLLOWING DIALOGUE WOULD ACCOMPLISH THIS GOAL: 
693 

694 * UNITS (D) ? 16 

695 UNIT 

696 <QUESTION 1> ? 75 

697 <QUESTION 2> ? 0-6 

698 <QUESTION 3> ? 76 
699 

700 UNIT 7 

701 <QUESTION 1> 7 

702 'QUESTION 2> ? 7-ii,. 13-15 

703 'QUESTION 3> ? 77 
704 

705 THE FIRST TIME THE SERIES IS ASKED, SLOT C*C RECEIVES A 75 

706 IN ALL 16 TABLES. SLOT TWO RECEIVES THE VALUES 0,1,2 6 

707 IN TABLES THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15. 

708 SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES. 
709 

710 THE SECOND TIME T**U THE SERIES, TABLES 7 THRU THE END ARE 

711 GOING TO BE AFFECTEO (NOTE THAT THIS PIECE OF INFORMATION IS 

712 PRINTED OUT FOR THE T^€ OPf.RATOR IN THE FORM -UNIT XX" AT 

713 THE BEGINNING OF EACH SERIES). QUESTION 1 IS RESPONDED TO 

714 BY A <CR>, SO SLOT ONE STAYS AT CONSTANT 75 IN TABLES 7 

715 THRU 15, SINCE NO NEW EXPLICIT VALUES ARE TYPED IN. SLOT TWO 

716 GETS THE VALUES 7,8.9,10.11 IN TABLES 7 THRU 11, AND 

717 GETS AN 11 IN SLOT 12, AND GETS THE VALUES IS. 14, 15 IN 

? 18 TABLES 13 THRU 15. SLOT THREE GETS THE VALUE 77 IN TABLES 7 

719 THRU 15. 

720 

721 THE DIALOGUE 13 TERMINATED WHEN THE SOFTWARE RECOGNIZES THAT 

722 16 EXPLICIT VALl^S HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION 

723 (NAMELY QUESTION 2)* 

724 

725 



SEQ 0014 
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727 

728 
729 
".30 
731 
732 
7 33 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
75C 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
7/4 
7/5 
776 
777 
778 
779 
780 
781 
782 
783 
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7,0 TEST DESCRIPTIONS 



TEST 1 <VRC PARITY GENERATION TEST> 

SUBTEST 1 - TEST OF CORRECT OOD VRC PARITY GENERATION : 

THE LINE UNIT IS PLACED IN CHAR MOOE, WITH OOD VRC. AND 7 -BIT CHARS SELECTED 
THE DATA CHARS IN PATTERN Q ARE LOADED /TRANSHI T TED/READ . AS THE 8TH BI T 
(PARITY BIT) OT EACH DATA CHAR IS SENT THE PROGRAM CHECKS TSO FOR THE PROPER 
STATE, FOR THE FIRST 4 CHARS IN PATTERN Q THE PARITY BIT SHOULD - 1, FOS THE 
LAST 4 CHARACTERS IT SHOULD ■ 0. 

SUBTEST 2 - TEST OF CORRECT EVEN VRC PARITY GENERATION : 

THE LINE UNIT IS PLACED IN CHAR MOOE. WITH EVEN VRC AND 7 -BIT CHARS SELECTED 
THE DATA CHARS IN PATTERN Q ARE LOADED/ TRANSMIT TED/READ. AS THE 8TH BIT 
(PARITY BIT) OF EACH DATA CHAR IS SENT THfc PROGRAM CHECKS TSO FOR THE PROPER 
STATE. FOR THE FIRST 4 CHARS IN PATTERN Q THE PARITY BIT SHOULD - 0, FOR THE 
LAST 4 CHARACTERS IT SHOULD - 1. 

DATA PATTERN Q • 000.003,014,060,001,007,037,177 



♦ NOTE; SINCE THE ROUTINE "SERIAL" TREATS THE FIRST BIT RECEIVED FROM THE 

♦ USYRT AS THE MSB, THE "EXPECTED BIT SEQUENCE" WILL HAVE A REVERSED 

♦ BIT ORDER. 

************************************** ********** ******* **************** ****** 



♦ TEST 2 <VRC ERROR DETECTION TEST> 

* 

♦ SUBTEST 1 - FORCING OF RERR USING 000 VRC 

♦ THE USYRT IS PLACED IN CHAR MOOE WITH 000 VRC AND BOTH TX AND RX CHAR 

♦ LENGTH-7 BITS. THE RECEIVER AND TRANSMITTER ARE THEN SYNC'D WHEN THE FIRST 

♦ DATA CHARACTER IS LOADED INTO TXD6, THE RX CHAR LENGTH IS CHANGED TO 6 BITS. 

♦ TWO 7 BIT CHARACTERS ('PARITY) ARE THEN TRANSMITTED, RESULTING IN A 16 BIT 

♦ STREAM WHICH THE RECEIVER WILL READ AS TWO 6 BIT CHARS C 'PARITY ♦ 2 LEFT), 

♦ THE FIRST "CHARACTER' 1 READ WILL HAVE THE CORRECT PARITY, THE SECOND WILL 

♦ NOT. 
* 

♦ SUBTEST 2 - FORCING OF RERR USING EVEN VRC 

♦ THE USYRT IS PLACED IN CHAR MOOE WITH EVEN VRC AND BOTH TX AND RX CHAR 

♦ LENGTH-7 BITS. THE RECEIVER AND TRANSMITTER ARE THEN SYNC'D. WHEN THE FIRST 

♦ DATA CHARACTER IS LOADED INTO TX06. THE RX CHAR LENGTH IS CHANGED TO 6 BITS. 

♦ TWO 7 BIT CHARACTERS C 'PARITY ) ARE THEN TRANSMITTED, RESULTING IN A 16 BIT 

♦ STREAM WHICH THE RECEIVER WILL READ AS TWO 6 BIT CHARS ('PARITY ♦ 2 LEFT), 

♦ THE FIRST "CHARACTER" READ WILL HAVE THE CORRECT PARITY, THE SECOND WILL 

♦ NOT. 
* 

************************************************** *************************** 

a***********************************************,********** ♦♦******,********** 

♦ TEST 3 <BCP CRC GENERATION/DETECTION TEST> 

* 

♦ THIS TEST IS COMPOSED QF £ SUBTESTS — n EXPECTS GOOD CRC 
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♦ GENERATION AND REPORT ERRORS -- 02 FORCES AN ERROR AND ONL i 

♦ REPORT WHEN THE CRC IS ACCEPTED AS GOOO, EACH IS 

* RUN AT THE CHARACTER LENGTHS Of 8 BITS FOR THE ENTIRITY 

* OF EACH MESSAGE. BOTH THE TRANSMITTER ANO RECEIVER WILL BE SET TO 

♦ THE SAME CHARACTER LENGTH. ERROR LOOPING WILL BE ON THE FAILING 

* S18TEST. TEXT STRINGS WILL BE LIMITED TO 5 CHARACTERS. 

******************************************* A********************************* 



**** 



TEST 4 <BOP RX BASIC RECEIVE/FLAG RECOGNITION TEST> 

THE USYRT IS INITIALIZED FOR BCP MOOE WITH TTL LOOKBACK SELECTED. 
"SECONDARY STATION ADORESS" IS NOT USED AND NO CRC/VRC IS CALCULATED. 
A PATTERN IS TRANSMITTED ANO TERMINATED FOLLOWED BY A SECOND ME'. SAGE. 
TERMINATION OF THE FIRST MESSAGE IS ACCOMPLISHED WITH A FLAG 
CHARACTER BUT RXE IS NOT DROPPED SO THAT THE 5EC0N0 MESSAGE CAN BE 
SENT WITHOUT RE-SYNCRONIZITION. SEVERAL FLAG'S ARE IDLED BETWEEN THE 
TWO MESSAGES. DURING THE SECOND MESSAGE A RECEIVER OVERRUN CONDITION 
IS FORCED. THROUGHOUT THIS TEST. BASIC RECEIVER OPERATION AND TIMING 
IS CHECKED. TRANSMITTED INFORMATION IS VERIFIED BY CHECKING THE DATA 
MADE AVAILABLE AT RXDB. 

TRANSMITTED PATTERN: FLAG FLAG 123 321 000 377 101 FLAG... FLAG 

321 123 377 000 276. 



* RECEIVED PATTERN: 123 321 OOO 377 101 321 123. 

************ ************** 1***4 *************** ********** ** ******************** 



TEST 5 <BOP RX SECONDARY STATION ADORESSING> 

THE USYRT IS INITIALIZED FOR BOP MOOE WITH TTL LEVEL LOOPBACK. 
SAM • 1, APA-O, AND ECM - 7, USING SHOPT MESSAGES, THE ADDRESSES 
000, 125. 252. 176. AND 177 ARE CHECKED TO SEE THAT THE RECEIVER 
RECOGNIZES THEM CORRECTLY. IN EACH CASE CAT EACH ADDRESS), A SERIES OF 
20 DIFFERENT MESSAGES ARE SENT TO VERIFY THAT THE USYRT WILL ONLY 
RESPONO TO THE SPECIFIED VALUE. 



♦ TEST PATTERN: AOR 000 OCR ADR 

4 WHERE AOR IS THE ADORESS BEING TESTED AND OCA IS THE ONE'S 

♦ COMPLEMENT OF THAT ADDRESS. 

* 

***************************************************************************** 

***************************************************************************** 

* 

* 

* 

♦ 

* 

* 

* 



TEST 6 <BOP RX ALL PARTIES ADDRESS TEST> 

INITIALIZE THE USYRT FOR BOP MOOE WITH TTL LEVEL LOOPflACK 

SAM ■ i. S/AR - 123C0CT,), APA - 1 , ANO ECM ■ 7. 

A SERIES OF 256 DIFFERENT SHORT MESSAGES ARE SENT TO VERIFY THAT 

THE USYRT MILL ONLY RESPOND TO THE SPECIFIED VALUE ANO ALSO 377 (FF 

HEX.). 

TEST PATTERN! ADR OQO OCA ADR 
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UHERE ADR IS THE ADDRESS BEING TESTED AND OCA IS THE ONE ' c > 

{♦ COMPLEMENT OF THAT ADDRESS. 

* *****++** + ** + i****************.************************* /.**** + **+*** + + */> + + *+** 

i* TEST 7 <BOP RX BIT STUFFING TEST* 
!♦ 

j* THE USYRT IS INITIALIZED AND THE FOLLOWING TEXT IS TRANSMITTED 

l* (DELIMITED BY THE APPROPRIATE CONTROL CHARACTERS -- OF COURSE): 



000. 017, 056, 074, 170, 360, 037, 076, 174, 370, 077, 176, 374, 
177, 376, 377. 



J* 
J* 
;♦ 

j* NOTE THAT THIS PATTERN CONSISTS OF CHARACTERS WHICH REQUIRE BIT 

{♦ STUFFING BOTH INOIVIDUALLY AND IN COMBINATION WITH ADJACENT 

j* CHARACTERS. THERE ARE ALSO CHARACTERS WHICH REQUIRE NO B\T STUFFING 

l* AT ALL. ALL 16 CHARACTERS ARE READ BY THE RECEIVER ANO COMPARED AS 

;* THEY ARE MADE AVAILABLE AT RXD8. 

[+**********+****++**+********+++*+**+******+******+**+*♦***♦*******•#•♦****♦♦ 

•ft**************************************************************************** 

;* TEST 8 <BOP RX UNDERRUN IDLE ABORTS/FLAGS> 

s* 

;♦ THE USYRT IS INITIALIZED ANO A MESSAGE IS STARTED. THEN. A 

,♦ TRANSMITTER UNDCRRUN IS FORCED WITH IDLE • -- CAUSING ABORT 

j* CHARACTERS TO BE IDLED. THE RECEIVER SHOULD BE RESET BY THE ABORT 

l* CHARACTERCS). VERIFY THAT RAB/GA BIT-1. 

j* REPEAT THE ABOVE WITH IDLE-1. 

;* TEST 9 <BOP RX LOST RXE TEST* 

j+ **»= USYRT IS INITIALIZED ArsJD A MESSAGE IS STARTED. WHILE IS THE 

, * MiLOLE OF TEXT, RXE IS DRONED AND THE REACTION OF THE RECEIVER IS 

;* 'vOUI'mJPEU. 



3T 10 <BOP RX GA (GO-AHEAD) RECOGNITION 



i* 

I* A SHORT MESSAGE IS TRANSMITTED FOLLOWED BY A GA CHARACTER (INSTEAD 

j+ OF A FLAG CHARACTER). THE RECEIVER IS OBSERVED FOR PROPER HANDLING 

!• OF BOTH THE MESSAGE AND THE GA CHARACTER. THE RA8/GA STATUS BIT 

I* SHOULD BE SET BY THE RECEIVER UPON RECOGNITION OF THE GA CHARACTER. 



?♦ TEST 11 <BOP RX "ABC" TEST> 

I* THIS TEST IS COMPOSED OF 7 SUBTESTS -- EACH ONE CHECKING A DIFFERENT 
j* EXPECTED VALUE IN ABC (THE 3 BIT "ASSEMBLED BIT COUNT" FIELD WIThIN 
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898 ;* RDSR). IN EACH SUBTEST THE U3YRT IS INITIALIZED ANO A SMALL MESSAGE 

899 j+ IS STARTED. THE LAST CHARACTER IS SENT WITH ITS LENGTH BEING 

900 j* SPECIFIED FIRST AS 1 BIT, THEN AS 2 BITS, THEN AS 3 BITS, ETC. IN THE 

901 ;* TRANSMITTER SIDE OF THE USYRT. IN ALL CASES THE RECEIVER IS LEFT SET 

902 i* TO 8 BITS IN LENGTH AND WHEN THE FLAG CHARACTER IS DETECTED, ABC IS 

903 ;♦ CHECKED AND SHOULD MATCH TXCL. ERROR LOOPING WILL BE ON THE FAILING 

904 t* SUBTEST. 
^05 ;♦ 

906 ; ************** A* ******** ****** + *********** + i***** + * + **** + ** + + **+ + + + + ****++*** 



SEQ 0018 
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908 

909 8.0 ERROR INFORMATION 

910 

911 

912 Q.l ERROR REPORTING 

913 

914 ERRORS ARE REPORTED BY THE PROGRAM AS THEY OCCUR (IF NOT 

915 INHIBITED). THE REPORT CONFORMS TO THE DIAGNOSTIC SUPERVISOR 

916 ERROR REPORT FORMAT, ANO CONSISTS OK A DESCRIPTION OF THE 

917 ERROR, THE TEST NUMBER, SUBTEST NUMBER, PC OF THE ERROR 

918 CALL, DEVICE ADDRESS, AND BASIC AND EXTENDED ERROR 

919 INFORMATION. 
920 

921 THE FOLLOUING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH 

922 DESCRIBES A "MASTER CLEAR FAILURE" ERROR. AND PROVIDES THE PC 

923 OF THE ERROR CALL ANO THE DEVICE REGISTER CONTENTS : 
924 

925 CNOMB DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PC: 021122 

926 MASTER CLEAR FAILURE 
927 

928 THE CONTENTS OF ALL BYTE SELECT REG'S ARE: 

929 BSELO BSEL1 BSEL2 BSEL3 

930 000 000 000 000 

931 BSEL4 BSEL5 BSEL6 BSEL7 

932 000 000 121 000 

933 BSEL10 BSEL11 BSEL12 BSEL13 

934 000 COO 000 000 

935 BSEL14 BSEL15 BSEL16 BSEL17 
93C 000 000 000 000 
937 

938 FOR OTHtR ERRORS. THE REPORT MAY BE MORE EXTENSIVE, ANO 

939 REQUIRE ADDITIONAL DATA TO BE REPORTED. 
940 

941 IF EXTENDED ERROR INFORMATION HAD BEEN INHIBITED USING THE 

942 IXE FLAG PRIW TO RUNNING THE TEST. THE ABOVE ERROR WOULO 

943 HAVE BEEN REPORTED IN THE FOLLOWING SHORTENED FORM : 
944 

945 CNOMB DVC FTL ERR OOOOl ON UNIT 00 TST 002 SUB 000 PC: 021122 

946 MASTER CLEAR FAILURE. 
94 7 

948 S 



SEQ 0019 
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950 




951 




952 




955 


000000 


954 




955 




956 




957 




963 


002000 


964 




965 




966 002000 




96? 




968 




969 002000 




970 




971 




972 


000001 


973 


000001 


974 


00000 i 


975 


000001 


976 


000001 


977 


000001 


973 


000001 


979 




980 




981 




98? 




983 





.SBTTL GENERAL EQUATES AND DS INVOCATION fi SETUP 



HELP-0 



, -2000 

.MCALL 
SVC 



JLSTIN- 1 
*LSTTAG- 1 

SVCINS- 1 

SVCTST- 1 

SVCSUB* 1 

SVCGOL- 1 

SVCTAG- 1 



CONTROL LISTING OF HELP INFORMATION 



HELP-0 
HELP-1 



NO L 1ST 
LIST 



SVC 



INITIALIZE SUPERVISOR MACROS 



BGNMOO LU1M0D 



LIST 
LIST 
LIST 
LIST 
LIST 



INSTRUCTIONS, SHIFTED RIGHT 
TEST TAGS, SHIFTED RIGHT 
S18TEST TAGS, SHIFTED RIGHT 
GLOBAL TAGS, SHIFTED RIGHT 
OTHER TAGS, SHIFTED RIGHT 



CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU UISH 
TO ALIGN THE MACRO CALLS ANO THEIR EXPANSIONS. CHANGE THE 
SYMBOLS TO BE MINUS -ONE TO NOT LIST THE EXPANSIONS, YOU MAY 
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



CNDMDAO DMV11 LINE UNIT DIAG2 
PROGRAM HEADER 



985 

986 
98 7 
988 
989 
990 
991 
^92 
1000 
1001 



002000 



002000 
002000 
0020O0 
002001 
002002 
002003 
002004 
002005 
002006 
002007 
002010 
002010 
002011 
O02011 
002012 
002012 
002014 
002014 
O02016 
002016 
002020 
002020 
002022 
OO2022 
002024 
002024 
002026 
002026 
002030 
002030 
002032 
002032 
002034 
002054 
002036 
002036 
C02040 
OO2O40 
002042 
002042 
002044 
002044 
002046 
002046 
.02050 
002050 
002051 

002052 



103 
116 
104 
115 
104 
000 
000 
000 

101 

060 

000000 

000036 

034100 

000000 

002154 

000000 

034356 

000000 

000000 

000000 

000000 

002124 

000000 

oooooo 
oooooo 

003 
005 
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>BTTL PROGRAM HEADER 

■ ♦ 

THE PROGRAM HEADER IS THE INTERFACE UETWEEN 
THE DIAGNOSTIC PROGRAM AND THF SUPERVISOR. 



POINTER BGNAU.BGNDU.ERRTRL 



HEADER CNDMD , A , , 50 . , 



SEG 0021 



L*NAME 





.ASCII 


/c/ 




.ASCII 


/N/ 




.ASCII 


/D/ 




.ASCII 


/M/ 




.ASCII 


/D/ 




.BYTE 







.BYTE 







.BYTE 





LtREV:: 








.ASCII 


/A/ 


LiDEPO: 








' .ASCII 


/o/ 


L iUNIT: 








'.WORD 





LtTIML: 








* .WORD 


30. 


L$MPCP: 








* .WORD 


L$HARD 


L$SPCP: 








* .WORD 





L.SHPTP: 








' .WORD 


L$HW 


LJ5PTP: 








".WORD 





LILADP: 








' .WORD 


LSLAST 


LISTA:; 








.WORD 





L$CO: : 








.WORD 





L1DTYP: 


: 






.WORD 





L$APT:: 








.WORD 





I. IOTP:: 








.WORD 


L IDISPATCH 


LfPRIO: 








* .WORD 





LIENVI: 








' .WORD 





LIEXP1; 








' .WORD 





L5MREV; 








' .BYTE 


C*RE^ISIQN 




*BtT£ 


CUiDIT 



L*EF; 
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SP.0 0022 



002052 


000000 


002054 


000000 


002056 




002056 


000000 


002060 




002060 


003232 


002062 




002062 


000000 


002064 




002064 


OOOOOO 


002066 




002066 


000000 


002070 




002070 


024346 


002072 




002072 


024342 


002074 




002074 


OOOOOO 


002076 




002076 


003252 


002 I OO 




002100 


104035 


002102 




002102 


002176 


002104 




002104 


023644 


002106 




002106 


024340 


002110 




002110 


024214 


002112 




002112 


023636 


002114 




002114 


OOOOOO 


002116 




002116 


OOOOOO 


0O2120 




002120 


OOOOOO 


1002 




1008 




1009 







.WORD 







.WORD 





I.ISPC:: 








.WORD 





LSDF.VP: 








' .WORD 


LfDVTrP 


LfRFPP: 








' .WORD 





L$EXP4: 








* .WORD 





L*EXP5: 








* .WORD 





L*AUT :: 








.WORD 


L*AU 


LIDLT:: 








.WORD 


L*DU 


L*LUN: : 








.WORD 





l.$DE5P: 


J 






.WORD 


LIDFSC 


LILOAD: 


: 






EMT 


EILOAO 


L *F_TP: : 








.WORD 


LiERRTBL 


L$ICP: : 








.WORO 


LilNIT 


LtCCP:: 








.WORD 


LSCLEAN 


LiACP:: 








.WORD 


LIAUTO 


L$PRT:: 








.WORD 


LlPROT 


LITEST: 


; 






* .WORD 





LJDLY: • 








.WORD 





LIHIME: 


• 






.WORD 






.EV&N 



CNDMDAO DMVU LINE UNIT DIAG2 
DISPATCH TABLE 
1011 

1C12 

1013 002122 

1014 
101b 
1016 002122 

1017 

1018 002122 

002122 000013 
002124 

002124 024350 

002126 025256 

002130 026070 

002132 026672 

0C.1134 027520 

002136 030232 

002140 030730 

002142 032074 

002344 032714 

002146 033156 

002150 033420 

1019 
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.SBTTL DISPATCH TABLE 

SLASH 

; {/////////////////////////////////////////////////////////////// 

;/ THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 

j/ IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

SLASH 

DISPATCH 11. 



SEQ 00*3 



.WORD 


11 


LJDISPATCH: : 




.WORD 


Tl 


.WORD 


T2 


.WORD 


T3 


.WORD 


T4 


.WORD 


T5 


.WORD 


T6 


.WORD 


T7 


.WORD 


T8 


.WORD 


T9 


.WORD 


T10 


.WORD 


Til 



CNDMDAO DMVU LINE UNIT DIAG2 
DEFAULT HARDWARE P- TABLE 



L t " 
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SFQ 0024 



1027 
1028 
1029 
1030 
1031 
1032 
10j3 
1034 
1035 



1036 
1037 
1038 
1039 
1040 
1041 
1042 
104? 
1044 
1045 
1046 
104 7 
1048 



002152 
002152 
002154 
002154 

002154 
002156 
002160 
002162 
002164 
002166 
002170 
002172 



002174 
002174 



SBTTL DEFAULT HARDWARE P TABLE 

//////////////////////////////////////////////////// //////////////////////// 
/ THE DEFAULT HARDWARE P- TABLE CONTAINS DEFAULT VALUES OF 
/ THF TEST -DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
/ IS IDENTICAL TO THE STRUCTURE OF THE RUN-TIME P- TABLE. 
/////////////////////////////////////////////////////////////////////////// 



000010 



160020 
0O0300 
004000 
OOCOOO 
000000 
000000 
000000 
000001 



BGNHW DFPTBL 



.WORD 


160020 


.WORD 


300 


.WORD 


4000 


.WORD 


000 


.WORD 


000 


.WORD 





.WORD 





.WORD 


1 



ENDHW 



L$HW: 
DFPTBL j : 

j DMVU CSR INIBUS ADDRESS 
;DMV11 INTERRUPT VECTOR 
;DMV11 INTERRUPT PRIORITY LEVEL 
; SWITCH REG. 01 (BOOT ADDRESS) 

SWITCH REG. 02 (DDCHP ADDRESS) 

MODULE IS M8064 

H32546H3255 USED 

BAUD RATE - 56 K 

- 19,2 K 

1 ' 56 K 



LIOQOOj 



.WORD L10000-L*MW/2 
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SOFTWARE P- TABLE 

1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 002174 

002174 000000 

002176 

002176 



SEQ 00^5 



1058 
1059 



002176 
002176 



SBTTL SOn WARE P- TABLE 

//////////////////////////////////////////////////// /// //////////////// 
/ THE SOFTWARE P- TABLE CONTAINS THE VALUES OF THE PROGRAM 
/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 
/////////////////////////////////////////////////////////////////////// 



BGNSW SFPTBL 



ENDSW 



L*SW: : 
SFPTBL 



LX0001 



.WORD L10001-L$SW/2 



N,: 



CNDMDAO DMV11 LINL UNIT DIAG2 MACRO M1200 22 FEB -84 lbs39 PAGE 14 
GLOBAL EQUATES SECTION -- BASIC EQUATES 



SEQ 00^6 



1061 
1062 
1063 
1 .64 
1065 
1066 
1067 
1068 
1069 



002176 



100000 
040000 
020000 
010000 
004000 
0020O0 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

ooiooo 

000400 
000200 
000100 
000040 
000020 
0000 1C 
000004 
000002 
000001 



000040 
0O003 7 
000036 
000035 
*) 00034 



000 340 
000 500 
000240 

0QQ20Q 



.SBTTL GLOBAL EQUATES SECTION 



BASIC EQUATES 



///////////////////////////////////////////////////////////////////////////// 
/ THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
/ ARE USED IN MORE THAN ONE TEST. 
///////////////////////////////////////////////////////////////////////////// 

EQUALS 



• BIT 


DIFINITI 


BIT15- 


- 100000 


BIT14- 


- 40000 


BIT13- 


- 20000 


BIT12- 


- 10000 


BIT11- 


- 4000 


BIT10- 


- 2000 


BIT09- 


- 1000 


BIT08- 


- 400 


BIT07* 


» 200 


BIT06- 


- 100 


BIT05- 


- 40 


BIT04- 


- 20 


BIT03- 


- 10 


BI102- 


- 4 


BIT01- 


" 2 


BIT00= 


- 1 


BIT9-- 


BIT09 


BITS-- 


BIT08 


BIT7-- 


BIT07 


BIT6-- 


BIT06 


BIT5-- 


BIT05 


bIT4-- 


BIT04 


BIT3-- 


BIT03 


BIT2-- 


BIT02 


BIT1-- 


BIT01 


BITO-- 


BITOO 



EVENT FLAG DEFINj TIONS 

EF32:EF17 RESERVFD ^OR SUPERVISOR TO PROGPAM COMMUNICATION 



EE 
EF 

^F 
EF 
tF 



START-- 
RESTART- 
CONTINUE 
NEW-- 
PWR-- 



32 
31 
30 
29 
28 



BIT POSITION IN SECONO STATUS UORD 
C 100000) START COMMAND WAS ISSUED 
C 040000) RESTART COfHAND WAS ISSUED 
( 020000) CONTINUE COMMAND WAS ISSUED 
(010000) A NEW PASS HAS btEN STARTED 
4 C 004000) A PQWfcS -FAIL/POWER -UP QCCURRtD 



PRIORITY LEVEL DEFINITIONS 



PRIO/ 
PRI06 
Pr:05 
PRIQ4= 



340 
300 
240 
200 



CNDMOAO DMVU LINE. UNIT DIAG2 MACRO M; 

GLOBAL EQUATES SECTION -- DASIC EQUATES 

000140 
000100 
000040 
000000 



000004 
OOOOIO 
000020 
000040 
OO01O0 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 
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PRI03-" 140 




PRI02-- 100 




PRI01-- 40 




PRI0O-* 




j OPERATOR FLAG BITS 




EVL-- 4 




LOT-- 


10 




ADR" 


?0 




IDU-' 


40 




ISR-" 


100 




UAH-- 


200 




BOE*« 


400 




PNT-- 


1000 




PRI-« 


2000 




IXE" 


4000 




IBE" 


10000 




IER-- 


20000 




LOE-- 


40000 




HOE-' 


100000 





SEQ 00*7 
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1071 




10 7c? 




1073 




1074 




1075 




1076 


OOC020 


1077 


000001 


1078 




1079 




1080 




1081 




1082 




1083 




1084 




1085 




1086 




1087 


OOC200 


1088 


000100 


1089 


000001 


1090 


000301 


1091 




1092 




1093 




1094 




1095 


000200 


1096 




1097 




1098 




1099 




1100 


000001 


1101 


000002 


1102 


000003 


1103 


000004 


1104 


000005 


1105 


000007 


1106 




1107 





MAINTENANCE REGISTERS -• SELN 6 BSELN 

.SBTTL REGISTER DEFINITIONS 



SEQ 0028 



MAINTENANCE REGISTERS 



SELN 6 BSELN 



{ i MAINTENANCE REGISTER P - BSELO 

IEO • BIT4 $ "INTERRUPT ENABLE OUT" 

IEI - BITO | "INTERRUPT ENABLE IN" 

I BIT 7 IS ALSO USED BY THE MICROCODE. ITS LABEL IS "RQI" WHICH STANOS FOR 

I "REQUIST IN". IT'S PART OF THE HANDSHAKING FOR USING THE SEL C BSEL REG'S, 

j HOWEVER, THE MAINT. LOOP DOES NOT MAKE USE OF THIS BIT AND IT IS THEREFORE 

I UNNECESSARY TO DEFINE IT HERE. 

I* MAINTENANCE REGISTER * I - 8SEL1 

RLN - BIT7 j "RUN" 6 ALSO CONTROLS 6502 MICROPROCESSOR'S RDY STATE 

MCLR • BIT6 -MASTER CLEAR 

MREQ - BITO tM-LOOP ACCESS 

STRTMLOP- RUNJMCLRJMREQ j INITIATE M-LOOP 

ji MAINTENANCE REGISTER ♦ 2 - BSEL2 
MRDY - BIT7 |M-L0OP READY 

!♦ MAINTENANCE LOOP COMMANO DEFINITIONS 

REOLOC • 1 iREAD LOC. W/IN DMV-11 ---* ( SEL4 ) •--> BSEL6 

WRILOC • 2 iWRITE LOC. W/IN DMV-11 --- BSEL6 ■■■> (SEL4) 

REDPAG ■ 3 »READ BLOCK W/IN DMV-11 --- (SEL6) •••> CSEL4) 

WRIPAG - 4 tWRITE BLOCK W/IN DMV-11 - ( SEL4 ) •-•> (SEL6) 

EXECUT - 5 jSET 6502' S PC AND EXECUTE -- SEL6 •-•> PC 

DOTBMT « 7 ,SET MAINTENANCE INTERRUPT DISABLE IN PROCESSOR 

I STATUS •-- CK87] *»> QSEL3 



n '• 
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REGISTER DEFINITIONS 



USYRT 



1109 




1110 




1111 




1112 


120400 


1113 




1114 




1115 




1116 




1117 




1118 


120400 


1119 




1120 




1121 




1122 




1123 




1124 


120401 


1125 




1126 




1127 


000200 


1128 


000160 


1129 


000010 


1130 


OO00O4 


1131 


000002 


1132 


000001 


1133 




1134 




1135 


lOOOOO 


1136 


004000 


1137 


002000 


1138 


O01000 


1139 


000400 


1140 




1141 


000001 


1142 




1143 




1144 




1145 




1146 




1147 


120402 


1148 




1149 




1150 




1151 




1152 




1153 


120403 


1154 




1155 




1156 


OO0200 


1157 


OOOOIO 


1156 


000OO4 


1159 


000002 


1160 


000001 


1161 




1162 




1163 


100000 


1164 


004000 


1165 


ooaooo 



SEQ 0029 



.SBTTL REGISTER DEFINITIONS - USYRT 



USYRT 120400 



j USYRT BASE ADDRESS - A100 (HEX) 



; }****»+< + , +*444****44*444*444444************«**««******»«**4 **************** 

;♦ l.T/riT "RECEIVER DATA BUFFER" REGISTER -- READ ONLY 

J j*** 4. 44*4*4t**4i**4 444444444444*44*44*44*4** ******4444+*4444444*444**4*4**44*++ 



RDSRL 



120400 



i ADDRESS OF THIS REG 



j i 



j* USYRT "RECEIVER STATUS" REGISTER -- READ ONLY 

j 1*44*44444444***4**********4*4********************************4444*444444*444 



RDSRH 



RERR 

ABC 

ROR 

RABGA 

REOM 

RSOM 



RXErtR 

RXOR 

RXABGA 

RXEOM 

RXSOM 

RERCHK 



120401 



I ADDRESS OF THIS REG 



jHir DEFINITIONS ON BYTE BASIS : 

• BIT7 iERROR CHECK 

> BIT6JBIT5JBIT4 lASSEMBLED BIT COUNT 

- BIT3 ^RECEIVER OVER RUN 

- BIT2 ^RECEIVED A80RT/GA CHARACTER 

- BITl iRECEIVED ENO-OF -MESSAGE 

- BITO iRECEIVED START -OF -MESSAGE 

iBIT DEFINITIONS ON WORD BASIS : 

- BIT15 iRECEIVED CRC/VRC ERROR 
■ BIT11 iRECEIVER OVER RUN 

- BIT10 iRECEIVEO ABORT/GO AHEAD CHARACTER 

- BIT9 iRECEIVED ENO-OF -MESSAGE 

• BIT8 iRECEIVED START -OF -MESSAGE 



BITO 



iFLAG TO INVOKE RERR CHK IN SUBROUTINE RXCHAR 



2 : 



;* USYRT "TRANSMITTER DATA BUFFER" REGISTER 

I | 4***444**********444********** 4444********* ********************** 4 4***44*** 4 



TDSRL 



- 120402 



» ADDRESS OF THIS REG 



: i 



1* USYRT "TX STATUS AND CONTROL" REGISTER 

I j * 444*****4********44************* ********** ********************************* 



TDSRH - 120403 



1 ADDRESS OF THIS REG 



iBIT DEFINITIONS ON BYTE BASIS : 
TERR • BIT7 > TRANSMITTER UNDERRUN ERROR 

TGA - BIT3 1 TRANSMIT GO AHEAO 

TAB - BIT2 ; TRANSMIT ABORT 

TEOM - BITl iTRANSMIT ENO-OF -MESSAGE 

TSOM » BITO iTRANSMIT START -OF -MESSAGE 

iBIT DEFINITIONS ON WORD BASIS : 
TXERR - BIT15 i TRANSMITTER UNDERRUN ERROR 

TXGA - BIT11 j TRANSMIT GO AHfcAD 

TXAB ■ BITXQ iTRANSMIT ABORT 
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REGISTER DEFINITIONS 



116b 


OOIOOO 


1 16 7 


000400 


1168 




1169 




1170 




n/\ 




n^v 




1173 


120404 


1174 


000226 


1175 




1176 




1177 




1178 




1179 




1180 


120405 


1181 




1182 




1183 




1184 


OO0200 


1185 


OOOIOO 


1186 


000040 


1187 


OOO020 


1188 


000010 


1189 


000007 


1190 




1191 




119? 




1193 


100000 


1194 


040000 


1195 


020000 


1196 


010000 


1197 


004 OOO 


1198 


000400 


1199 


001400 


1200 


003400 


1201 


002400 


1202 


002000 


1 :»03 




120*1 




1205 




1206 




1207 




1206 


120407 


1209 




1210 




1211 




1212 


000340 


1213 


O0O020 


1214 


OOOO10 


1215 


000007 


1216 




1217 




1218 




1219 




1220 


laaooG 


1221 




XZZZ 





USYRT 



SEQ 0030 



TXEOM 
TXSOM 



bIT9 
BIT8 



t TRANSMIT END OF -MESSAGE 
l TRANSMIT START -OF -MESSAGE 



;♦ USYRT "SYNC/SECONOARY ADDRESS" REGISTER 

>j+ + + * + 4+* + + * + ** + ******* + ** + + *************4******»**<t ************* ******+****♦ 



PCSARL 
SYNCH 



120404 
226 



j ADDRESS OF THIS REG 

j STANDARD SYNCH CHARACTER 



'l**************************************************************************** 

;♦ USYRT "HOOF CONTROL" 

..********* ** *********************************************** ****************** 

PCSARH - 120405 i ADDRESS OF THIS REG 
jBIT DEFINITIONS ON BYTE BASIS: 



APA 
PROTO 
STRIP 
SECAD 

IDLE 
XYZ 



APAO 

OOCMP 

STRIPS 

SECAOR 

IDLES 

CRCOS 

CRC16 

NOCHk 

EVRC 

OVRC 



» BIT7 
* BIT6 

- BITS 

- BIT4 

- BIT3 



I "ALL PARTIES AOORESS" ENABLE 

i SPECIFIES BOP/CCP PROTOCOL -- - BOP 

I STRIP EXTRA SYNC'S IN CCP MODE, SEE GA CHARS IN BOP 

jSECONOARY ADDRESS MOOE -- BOP MODE ONLY 

i IDLE 6 SYNC CHAR. TRANSMISSION CONTROL 



- BIT2!BIT1!BIT0 ,CRC/PAR.TTV SELECTION CONTROL 

jBIT DEFINITIONS ON WORD SASIS: 

BIU5 i "ALL PARTIES AOORESS" ENABLE 

BIT14 ,C00€ FOR DOCHP MOOE 

BIT13 iSTRIP EXTRA SYNC'S IN CCP MOOE. SEE GA CHARS IN BOP 

BIT12 i SECONDARY AOORESS MOOE -- BOP MOOE ONLY 

BIT11 »IDLE £ SYNC CHAR. TRANSMISSION CONTROL 

BIT8 iCOOE FOR CRC-CCITT-0 SELECTION 

BIT9!BIT6 iCOOE FOR CRC-16 SELECTION 

BIT10!BIT9JBIT8 j COOE FOR NO ERROR CHECKING 

9IU0JBIT8 ,C0OE FOR VRC EVEN CHECK 

BIT10 i CODE FOR VRC ODD CHECK 



! I 



,* USYRT "DATA LENGTH SELECT" REGISTER 



; i 



************* 



PCR 



TXDL 
EXADO 
EXCON 
RXDL 



■ 120407 



j ADDRESS OF THIS REG 



jBIT DEFINITIONS: 

• BIT7!BIT6!BIT5 , TRANSMIT DATA LtNGTH SELECTION 

- BIT4 iEXTENDED AOORESS FIELD - ■■ NOT USED OR TESTED 

- B1T3 jEXTENDEO CONTROL FIELD - ■ NOT USED OR TESTED 

- BIT2!BIT1!BIT0 jRECEIVER DATA LENGTH SELECTION 



i i 



i* USYRT STATUS REGISTER (ADOR. A400) 



; i 



.4***** + 



USTATR % 122000 i USYRT STATUS REGISTER ADDRESS » A400 CHEX) 
iBIT DEFINITIONS: 
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REGISTER DEFINITIONS 



USYRT 



SEU 0051 



1223 




1224 


000200 


1225 


000100 


1226 


000040 


1227 


0OO020 


1228 


OOOOIO 


1229 


000004 


1230 


000002 


1231 


000001 



ROA 


- BIT/ 


TBMT 


- BIT6 


RXACT 


- BITS 


RSA 


• BIT4 


TSO 


- BIT3 


TXACT 


- BI12 


TXU 


■ BIT1 


SFR 


- BITO 



{RECEIVER DATA AVAILABLE 
{TRANSMITTER BUFFER EMPTY 
{RECEIVER ACTIVE 
{RECEIVER STATUS AVAILABLE 
j TRANSMITTER SERIAL OUTPUT 
{TRANSMITTER ACTIVE 
{TRANSMITTER UNDERRUN 
i SYNC/FLAG RECEIVED 



G / 



REGISTER DEFINITIONS 
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6522 VIA CHIP 

.SBTTL REGISTER DEFINITIONS -- 6522 VIA CHIP 

VIA » 120000 | VIA BASE ADDRESS - AOOO (hEX) 

+ MODEM E MAINTENANCE CONTROL -- "ORB" 8 BIT PORT B -- WRITE ONL r 

VIAORB - 120000 2 ADDRESS OF THIS REGISTER - - HEX > AOXO 

"NULL CLK L" -- NULL CLOCK 
"RXENL" -- US>RT RECEIVER ENABLE 
•TXENL" -- USYRT TRANSMITTER ENABLE 
"DTR" -- DATA TERMINAL READY 
"RTSND" -- REGHJEST TO SENO 
"HOX" -- HALF DUPLEX 
"SELECT TTL LEVEL LOOPBACK " 
"PRESET H" -- 
DTR IS ASSERTED LOW 

•t**************************************************************** *********** 

* MOOEM STATUS REGISTER -- "ORA" 8 BIT PORT A -- REAO ONLY 

; ******************************************* ****** *************************** 



SEQ 0032 



1253 




1234 




1235 


120000 


1236 




1237 




1238 




1239 




1240 




1241 


120000 


1242 




1243 


000200 


1244 


000100 


1245 


000040 


1246 


000020 


1247 


000010 


1248 


000004 


1249 


000002 


1250 


000001 


1251 


000000 


1252 




1253 




1254 




1255 




1256 




1257 


120001 


1258 




1259 


000200 


1260 


000100 


1261 


000O40 


1262 


000020 


1263 


000010 


1264 


OO0004 


1265 


000002 


1266 


000001 


1267 




1268 




1269 




1270 




1271 




1272 




127:. 


120002 


1274 




1275 




1276 




1277 




1278 




1279 




1280 




1281 




3282 




1283 




1284 




1285 


120003 


1286 




1287 




1288 




1289 





NU_CLK ■ 


■ BIT7 


RXEN 


- BIT6 


TXEN 


■ BIT5 


DTR 


- BIT4 


RTSND 


■ BIT3 


HOX 


■ BIT2 


TTLOOP 


■ BIT1 


PRESET 


• BITO 


DTRL 


• 



VIAMS 



120001 



RING 


■ BIT7 


CARIER » 


• BIT6 


MDMRDY ■ 


• BIT5 


SPEED 


• BIT4 


CTS 


• BIT3 


TM 


• BIT2 


RCVDAT • 


• BIT1 


UHAINT • 


■ BITO 



j ADDRESS OF THIS REGISTER --HEX - A0X1 

s"RING H" - - 

, "CARRIER H" -- 

j "MOOEM ROY H" -- 

1 "BAUD RATE SWITCH -- C19.2K/56K) 

j "CTS H -- CLEAR TO SEND 

;"TEST MODE H" -- 

;"RCV DATA H" - - 

i SELECT USYRT INT LOOPBACK ♦♦SELECT BIT** 



;* DATA DIRECTION FOR PORT B -- "D0R6" -- READ/WRITE 

j;***** *********************************************************************** 



VIADPB 



120002 



i ADDRESS OF THIS REGISTER -- HEX - A0X2 



; ALL BITS ARE DEFINED THE SAH6: 

5 THE BIT SETTING DEFINED THE DIRECTION OF ITS RELATED BIT IN BIT PORT B 

S INITIALIZED TO 377 (HEX - FF) -- PORT B IS READ/WRITE 

♦ **************************************************************************** 

* DATA DIRECTION FOR PORT A -- "DDRA" -- READ/WRITE 
,»**********♦******♦*♦**♦♦♦*****♦♦****************♦*.**♦***♦♦****♦****♦******** 



VIADPA 



120003 



j ADDRESS OF THIS REGISTER 



HEX - A0X3 



i ALL BITS ARE DEFINED THE SAME: 

1 THE BIT SETTING DEFINED THE DIRECTION OF IIS RELATED BIT IN BIT PORT A 



H '> 
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REGISTER DEFINITIONS -- 

1290 
1291 

1292 
1293 

1294 
1295 

1296 

1297 

1298 

1299 120004 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

130^ 

1310 

1311 120005 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 120006 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 120007 

1336 

1337 

1338 

1339 

1540 

1341 

1342 

1343 

1344 

1345 

1346 X£QQ1Q 



65L'2 VIA CHIP 



5E0 0033 



INITIALIZED TO 001 (HEX « 01) -- PORT A lb READ ONLY (EXCEPT FOR 

8IT0 WHICH ENABLES USYRT INTERNAL LOOPBAOO 



; **************************************************************************** 

+ TIMER 1 LOW ORDER CLATCH £ COUNTER) - "TIL-L" £ "T1C-L" -- WRITE £ READ 

;******************<+********************************************************* 



VIAT1A 



120004 



t ADDRESS OF THIS REGISTER - - HEX * A0X4 



WHEN WRITING, LOW ORDER LATCH IS LOADED. 
WHEN READING, LOW ORDER COUNTER IS READ. 



****************************************************************************** 

;* TIMER 1 HIGH ORDER COUNTER £ TRIGGER - "T1L-H AND TRIGGER" £ "T1C-H" 
;* -- WRITE £ READ 

. ; *****S. ********************************************************************** 



VIAT1B 



120005 



j ADDRESS Of THIS REGISTER 



HEX - A0X5 



WHEN WRITING; HIGH ORDER LATCH IS LOADED, 80TH LOW £ HIGH ORDER LATCHES 
ARE LOADED INTO THE COUNTER, ANO THE COUNTER IS STARTED. 

WHEN READING, THE HIGH ORDER COUNTER IS READ. 



{j**************************************************************************** 

;* TIMER 1 LOW ORDER LATCH - - "UL-L" - - READ/WRITE 

• j ********************************* ************* ******************** ** «« ****** 



VIATIC 



120006 



j ADDRESS OF THIS REGISTER 



HEX 



A0X6 



THE LOW ORDER LATCH IS READ OR LOADED. THIS LATCH IS USED TO LOAD THE 
COUNTER WHEN T1M0DE (IN VIAACR) - 3 



;* TIMER 1 HIGH OftDER LATCH -■ "TIL H" -- READ/WHITE 

j ]*************** *********************************** ******* ¥ ***« ************** 



VIAT1D 



120007 



jADDRESS Of THIS REGISTER 



>*X 



AOX 7 



THE HIGH ORDER LATCH IS READ OR LOADED. THIS LATCH IS USED TO LOAD THE 
COIWER WHEN T1M0DE (IN VIAACR) - 3 



* TIMER 2 LOW ORDER (LATCH £ COUNTER) 

;***** ********* «*,****.****,***********« 



VIAT2A 



120010 



• "T21.-L" £ "T2C-L" 
I ADDRESS OF THIS REGISTER -- HEX 



WRITE £ READ 
***** ********** 



Aoxe 



CNDMDAO OMVll LINE UNIT 
REGISTER DEFINITIONS - 

1S4/ 

1548 
1549 
1350 
1351 

1353 

1554 

1355 

1356 

135/ 

1358 120011 

1359 

1360 

1361 

136? 

1363 

1364 

1365 

1366 

136 7 

1366 

1369 120012 

1370 

1271 

13/2 

1373 

13/4 

1375 

1376 

1377 

1378 

1379 120013 

1380 

1381 000300 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 000040 

1392 

1393 

1394 

1395 

1396 000034 

1397 

1398 

1399 

1400 

1401 

1402 

1403 



DIAG2 MACRO M1200 
6S22 VTA CHTP 
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SEQ 0034 



WHfcN WRITING, LOW ORDER LATCH IS LOADED 
WHEN READING, LUW ORDER COUNTER IS PEAD 



* TIMER d HIGH ORDER COUNTER £ TRIGGER •• - "T2L-H hND TRIGGER" 6 "T2C H" 

* -- WRITE £ READ 



VIAT2R 



120011 



{ADDRESS OF THIS REGISTER 



HEX 



A0X9 



j UHEN WRITING; HIGH ORDER LATCH IS LOADED, BOTH LOW 6 HIGH ORDER LATCHES 
i ARE LOADED INTO THE COUNTER, AND THE COUNTER IS STARTED. 

j WHfcN READING, THE HIGH ORDER COUNTER IS READ. 

;♦ SHIFT REGISTER -- "SR" -- READ/WRITE 

VIASR - 120012 fADDRESS OF THIS REGISTER —HEX - AOXA 

i SHIFTING IS CONTROLLED BY THE SETTING OF VIASRC CACR2 ---> ACR4 ) IN VIAACR 



J***************************************************************************** 

j* AUXILIARY CONTROL REGISTER - - "ACR" - READ/WRITE 



VIAACR 
T1M0DE 



« 120013 
- BIT7JBIT6 



T2M0DE - BIT5 



iBIT 7s 

i 
; 1 

iBIT 6; 
: 
l 1 



} 

J 1 



SRMODE - BIT4!BIT3!BIT2 

J 

j 1 

* 2 

i 3 

i 4 

j b 



{ADDRESS OF THIS REGISTER -- HEX - AOXB 
{CONTROL THE MODE OF TIMER 1 



PR/ DISABLED - ONLY TITO IN VIAIFR REFLECTS TIMEOUT 
PB7 6 TITO REFLECT TIMEOUT 



TIMER 1 IN ONE -SHOT MODE 

TIMER 1 IN CONTINUOUS SQUARE WAVE MODE 

{CONTROLS THE MODE OF TIMER * 1 

PULSE COUNTING MOOc 
INTERVAL TIMER hOOE 

{CONTROLS THE MODE OF THE SHIFT REGISTER 

SR DISABLED 

SHIFT IN UNDER CONTROL OF T2, SHFT PULSES GEN» D ON CB1 
SHIFT IN AT SYS. CLOCK PATE, SHFT PULSES GEN'D ON CB1 
SHIFT IN UNDER CONTROL OF EXTERNAL INPUT PULSES 
SHIFT OUT -- FREE RUNNING -- RATE CONTROLLED BY T2 
SHIFT OUT -- RATE CONTROLLED Bt T2 -- PULSES ON CB1 



U > 
CNDMOAO OMV11 LINE UNIT DIAG2 MACRO M12O0 22rE6-84 lf>:39 PAGE 17-3 

REGISTER DEFINITIONS — 6W2 VIA CHIP 



SEQ 005! 



1404 




140b 




1406 




140.' 


000002 


1408 


000001 


1409 




1410 




14H 




1412 




1415 




1414 




1415 




1416 




1417 


120014 


1418 




.M19 


000340 


1420 


OOC020 


1421 


000016 


1422 


000001 


1425 




1424 




1425 




1426 




1427 




1428 




1429 




1430 


120015 


1451 




1432 


000200 


1433 




1454 




1435 




1436 




1437 




1438 


000100 


1439 


000040 


1440 


000020 


1441 


000010 


1442 


000004 


1443 


000002 


1444 


000001 


1445 




1446 




1447 




1448 




1449 




1450 




1451 




1452 


120016 


1453 




1454 


000200 


1455 




1456 




1457 




1458 




1459 




1460 





j 6 
j 7 



PBLENH 
PALENB 



B1T1 
8IT0 



SHIFT OUT -- SYS. CLOCK RATE -- PULSES ON CB1 
SHIFT OUT -- UNDER CONTROL OF PULSES APPLIED TO C81 

{ PB LATCH CONTROL -- 1 ENABLES LATCH 
jPA LATCH CONTROL -- 1 ENABLES LATCH 



;;***************************************************************************+ 

;* PERIPHERAL CONTROL REGISTER -- "PCR" -- READ/WRITE 

•j*************.*************************************************************** 



VIAPCR 



120014 



CB2CTL - BIT7!BIT6!BIT5 

CB1CTL - BIT4 

CA2CTL - BIT3'BIT2!BIT1 

CA1CTL * B1T0 



jADDRESS OF THIS REGISTER 

jCB2 MODE SELECT 
iCBl MODE SELECT 
;CA2 MOOE SELECT 
}CA1 MODE SELECT 



HEX =- AOXC 



;;*************************************v************ ********* ***************** 

;* INTERRUPT FLAG REGISTER — "IFR" -- READ ONLY 

;;**************************************************************************** 



VIAIFR 
FLGIRQ 



120015 
BIT7 



j ADDRESS OF THIS REGISTER - - HEX - AOXD 

j SET WHEN A FLAG IN THIS REG. GOES HIGH AND 
iITS CORRESPONDING BIT IN VIAIER IS SET. 
I (I.E. VIAIER IS THE ENABLE REGISTER FOR THE 
;FOR THE SETTING OF IRQ AND THE ISSUEANCE OF 
j AN INTERRUPT TO THE 6502 WHEN IRQ IS SET.) 

; TIMEOUT OF TIMER 1 

; TIMEOUT OF TIMER 2 

{ACTIVE TRANSITION OF PIN 18 (CB1) 

{ACTIVE TRANSITION OF PIN 19 CC02) 

I COMPLETION Of H SHIFTS 

j ACTIVE TRANSITION OF PIN 40 (CAD 

j ACTIVE TRANSITION OF PIN 39 (CA2) 



•}*********•**********♦******************♦********************************»*** 

j* INTERRUPT ENABLE REGISTFR -- "IER" - READ/WRITE 

;;****************************************************«********************«** 



FLGT1 


- BIT6 


FLGT2 


- BIT5 


FLGCB1 


- BIT4 


FLGCB2 


- BIT3 


FLGSR 


- BIT2 


FLGCA1 


- BIT1 


FLGCA2 


■ BITO 



VIAIER 
INTSC 



120016 
BIT7 



} ADDRESS OF THIS REGISTER -- HEX - AOXE 

{CONTROLS THE SETTING OR CLEARING OF BITS IN 
{THE REST OF IER. IF • THE OTHER BITS IN 
{THIS REG., IF SET. WILL CLEAR THEIR RESPECTIVE 
{BITS IN THE INI, ENAB . REG.. IF - 1, THE 
{RESPECTIVE BITS WILL OE SET. 



t WHEN WRITING THIS REG., THE COMMENT ABOVE HOLDS, 



1/ ■/ 

I J 
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REGISTER DEFINITIONS - 6522 VIA CHIP 



SEQ 00.56 



1461 
1462 

1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
14 71 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 



WHEN READING THIS REG., THE CURRENT STATE OF THE INT. ENABLE REG. IS RETURNED. 
THE BIT ASSIGNMENTS ARE THE SAME AS FOR VIAIFR AS DEFINED ABOVE. 



;* OUTPUT REGISTER A - •• "ORA" - READ ONLY (OR READ/WRITE UNO EH CONTROL OF "DDPA'O 

; ;* + + + + + + ** + + **+ + + *<M* + ** + * ****** *** + **♦**#**** + *** + •***** + ****•♦****♦♦******* 



120017 



VIAORA 



120017 



{ADDRESS OF THIS REGISTER 



HEX 



AOXF 



; THIS ADDRESS ACCESSES THE SAME DATA AS "VIAMS" EXCEPT THAI NO "HANDSHAKING" 
j WILL TAKE PLACE (I.E. THERE IS NO CHANGE IN IRQ OR CA2 AS A RESULT OF 
; READING ORA THROUGH THIS ADDRESS) 

{ TH£ BIT ASSIGNMENTS AKE THE SAME AS FOR "VIAMS" ABOVE. 



L 



CNDMOAO DMV11 LINE UNIT IJIAG2 
REGISTER DEFINITIONS - MISC 



1483 




1484 




1485 




1486 




1487 




1488 




1489 


121000 


1490 


121400 


1491 




1492 




1493 




1494 


100000 


1495 


001000 


1496 




149/ 


000002 


1498 


000001 


1499 




1500 


040000 


1501 


001000 


1502 




1503 


000200 


1504 




1505 


100000 


1506 


040000 


1507 


020000 


1508 
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.SBTTL REGISTER DEFINITIONS -- MISC 
* SWITCH PACKS 



SEQ 0057 



SWPBOT - 121000 
SWPDDCMP « 121400 

; MISCELLANEOUS EQUATES 



TCCHEK > 
RAMAOR • 


BIT15 
■ 001000 


EIAV35 ■ 

INTGRL - 


• B1T1 

• BITO 


NCRXEN • 
NOLOOP « 


' BIT14 
• BIT9 


NCTBHT ■ 


• BIT7 


NOCRDA ■ 
NTCRDA * 
NCRACT - 


• BIT15 

■ BIT14 

• BIT13 



j"300T ADDRESS" SWITCH PACK [A200] 
:'»DDCMP ADDRESS" SWITCH PACK (A3001 



{FLAG TO REQUEST H3254 , 5 CHECK 

; STARTING ADRS OF RAM PAGE 2 CADRS 0200 HEX) 

{SELECT V.35 OR ETA 423/232C 
; SELECT INTEGRAL MODEM 

sKILL RXEN DURING "INITRN" 
;KILL TTLOOP DURING "INITRN" 

;DISABLE INITIAL TBMT-0 CHECK IN TXCHAR 

;DISABLE INITIAL RDA«0 CHECK IN RXCHAR 

;DISABLE FINAL RDA-1 CHECK IN RXCHAR 

iDISABLE RXACT-1 CHECK AFTER CLOCKING (RXCHAR) 



vl / 



CNDMDAO DMV11 LINE UNIT DIAG2 
GLOBAL DATA SECTION 

1766 

1769 
1770 
1771 
1772 
17 73 
17 74 
1775 
1776 
1777 
1778 
1779 



1780 

1781 

1782 

1783 

1784 

1785 

17** 

17o7 

1788 

1789 

1790 

1791 

1792 

1793 

1794 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1602 

1803 

1804 

1805 

1806 

1807 

1808 

1809 

1810 

1811 

1812 



002176 
002176 
002176 
002200 
0C2202 
002204 



002206 
002206 
002210 
002210 
002212 
002212 
002214 
002214 
002216 
002216 
002220 
0022C0 
002222 
002222 
002224 
002224 
002226 
002230 
002232 
002234 
002236 
002240 
002242 
002244 

002246 



002266 



000000 
000000 
000000 
OOCOOO 



000000 

oooooo 

000000 

oooooo 

oooooo 

oooooo 

oooooo 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 



MACRO M1200 22 FEB-84 15:39 PAGE. 19 



.SBTTL GLOBAL DATA SECTION 

//////////////////////////////////////////////////// '/////'" •:. t //////////// 

/ THE GLOBAL DATA SLCTION CONTAINS DATA THAT A»^ y^hL) 

/ IN MORE THAN ONE TEST. 

f+****************************+****************#*********+«******+*******fc*** 

CONTROL BLOCK FOR STACKED ERROR MESSAGES 

- ~ ********* ************************************ ***+*******+*********** ****!*** 



SEC) 0038 



ERRTBL 



L$ERRTBLj : 



.WORD 





.WORD 





.W0R0 





.WORD 






ERRTYP 
ERRN8R 
ERRMSG 
ERRBLK 

J*************************************************************************** 

* STORAGE FOR DEVICE REGISTERS 

J********************************************************************. * ****** 



WSRO: 

BSRO: 

WSR2: 

BSRli 

WSR4: 

BSR2: 

USR6: 

BSR3: 

WSR10: 

BSR4- 

WSR12: 

BSR5: 

WSR14: 

BSR6: 

WSR16: 

BSR7: 

BSR10; 

BSR11: 

9SR12: 

BSR13: 

BSR14j 

BSR15: 

BSR16: 

BSR17: 

UREGS: 
VREGS: 



.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BLKW 
.BLKW 



























8. 
16. 



; STORAGE FOR DEVICE CSR REGISTERS 



{THE FIRST 7 ARE FOR THE USYRT'S ACTUAL 
{REGISTERS. THE LAST ONE IS FOR THE STATUS 
jREG. (USTATR). 
{STORAGE FOR VIA REGISTERS FOR PRINTOUT 



N 



/ 
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SEQ 0039 



1814 
1615 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1627 
1828 
1829 
1630 
1831 
1632 
1833 
1834 
1635 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
1643 
1844 
1845 
1846 
1847 
1848 



002326 
002330 
002332 
002334 
002336 
002340 
002342 
002344 
002346 
002350 
002352 

002354 
002356 
002360 
002362 
002364 
002366 
002370 
002372 
002374 
002376 
002400 
002402 
002404 
002406 
002410 
002412 
002414 
002416 
002420 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

oooooo 
oocooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 



A**************.*************************** 



,♦*++* 



<tfc A ******************** 
!* MISCELLANEOUS STORAGE 

; A********************************************************************** 

:TEST DATA 
GOOD DATA 
BAD DATA 

EXCLUSIVE -OR BETWEEN GOOD AND BAD DATA 
GEN'L PURPOSE SCRATCH WORD 
LOGICAL DEVICE NUMBER 
CONTAINS A DEVICE REGISTER NUMBER 
CONTAINS BASE LEVEL PROGRAM STACK POINTER 
CPU PRIORITY FOR PRINTOUT 
PC OF SU6R CALL FOR ERROR REPORTS 
INTERRUPT RECEIVED FLAGS 

BIT FOR TX, BIT 1 FOR RCV 
SUBROUTINE ERROR FLAG 
EVENT TIME-OUT FLAG 
SUBR ERROR RETURN ADDRESS 
LO BYTE CONTAINS BYTE READ FROM LU REG 
LO BYTE CONTAINS BYTE TO LOAD INTO LU REG 
CONTAINS TEST DATA LOADED INTO REG 
STORAGE FOR EXPECTED DATA 
STORAGE FOR ACTUAL DATA 
FLAG-0 IF PROGRAM JUST LOADED 
SAVE LOC 4 HERE (ERROR TRAP VECTOR) 
SAVE LOC 6 HERE (ERROR TRAP VECTOR) 
SUBR ERR. BIT FLAGS (DEF'D IN GLOBAL EQUATES) 
USYRT CHIP TYPE. -0 FOR SMC. ELSE -1 
SAVED TX AND RCV CHAR LENGTHS 
BIT MAP OF ACTIVE DEVICES 
DEVICE MAP BIT POINTER 
CONTAINS UNIT NO. (1 TO N) 
FLAG TO SHOW NO. OF PASSES SINCE STA OR RES 

iNO, OF CURRENT TEi- " (FOR SOME TESTS) 



TDATA; 


.WORD 





GDATA: 


.WORD 





BDATA: 


.WORD 





XDATA: 


.WORD 





SCRACH 


.WORD 





LOGOE^j 


.WORD 





REGNUMj 


.WORD 





PSTACK, 


.WORD 





PRIOR; 


.WORD 





SUBRPC. 


.WORD 





INTFLG: 


.WORD 





ERRFLG 


.WORD 





TIMFLG 


.WORD 





RETAOR 


.WORD 





REDBYT 


.WORD 





WRI3YT 


.WORD 





LOADAT 


.WORD 





GOODAT 


.WORD 





BADDAT 


.WORD 





FRSTIM 


.WORD 





SAVE4: 


.WORD 





SAVE6: 


.WORD 





ERR0R1 


.WORD 





CHPTYP 


.WORD 





SAVLEN 


.WORD 





DEVMAP 


.WORD 





DEVPTR 


.WORD 





UNIT: 


.WORD 





STARES 


.WORD 





TSTNUM 


. .WORD 






F.VI 
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1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
.1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
1878 
1879 
1880 
1881 
1882 
1883 
1884 
1885 
1886 



002422 
002422 
002422 
002424 
002426 
002426 
002430 
002432 
002432 
002434 
002436 
002436 
002440 
002442 
002442 
002444 
002446 
002446 
002450 
002452 
002452 
002454 
002456 
002456 
002460 

002462 
002464 
002466 
002470 
002472 
002474 
002476 
002500 



160020 
160021 

160022 
160023 

160024 
160025 

160026 
160027 

160030 
16C031 

160032 
160O33 

160034 
160035 

160036 
160037 

000300 
000304 
000240 
000000 
000000 
000000 
000000 
000001 
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,,♦+**♦**+♦ CURRENT DEVICE PARAM 


BSELOt 






SELOi 






MPCSRt 


.WORD 


160020 , 


BSEL1: 


.WORD 


160021 i 


BSEL2: 






SEL2: 


.WORD 


160022 i 


BSEL3; 


.WORD 


160023 j 


BSEL4; 






SEL4: 


.WORD 


160024 , 


BSEL5: 


.WORD 


160025 ; 


BSEL6; 






SEL6: 


.WORD 


160026 | 


BSEL7; 


.WORD 


160027 | 


BSEL10: 






SEL10: 


.WORD 


160030 i 


BSELU: 


.WORD 


160031 i 


BSEL12: 






SEL12: 


.WORD 


160032 » 


BSEL13: 


.WORD 


160033 i 


BSEL14: 






SEL14: 


.WORD 


160034 j 


BSEL15: 


.WORD 


160035 » 


BSEL16: 






SEL16: 


.WORD 


160036 j 


BSEL17: 


.WORD 


160037 j 


MPIVEC: 


.WORD 


300 i 


MPOVEC: 


.WORO 


304 i 


MPRIOR: 


.WORD 


240 i 


LUSWI1: 


.WORO 


i 


LUSUI2: 


.WORD 


4 


BROTYP; 


.WORD 


i 


TSTCON: 


.WORD 


i 


BORATE $ 


*WORD 


1 j 



SEQ 0040 



PARAMETERS ♦♦♦♦♦♦♦♦♦♦♦♦♦ 



POINTER TO DMV11 CSR'S 
POINTER TO BSEL1 

POINTER TO SEL2 
POINTER TO B5EL3 

POINTER TO SEL4 
POINTER TO BSEL5 

POINTER TO SEL6 
POINTER TO BSEL7 

POINTER TO SEL10 
POINTER TO BSEL11 

POINTER TO SEL12 
POINTER TO BSEL13 

POINTER TO SEL14 
POINTER TO BSEL15 

POINTER TO SEL16 
POINTER TO BSEL17 

D«V11 INPUT INTERRUPT VECTOR 
DHV11 OUTPUT INTERRUPT VECTOR 
DMVll DEVICE PRIORITY 
LINE UNIT SWITCH PACK #1 
LINE UNIT SWITCH PACK #2 
0-H8064. 1-M6053/V.35,2»M8053/EIA 
TEST CONNECTOR INOIGATOR 
BAUD RATE • 56 K 

• 19.2 K 

1 * 56 K 



CNOMOAO DMV11 LINE UNIT UIAG2 MACRO M1200 
GLOBAL DATA SECTION 



CA 
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<iEQ 0041 



1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1926 
1927 
1928 
1929 
1930 
1931 



002502 
002504 
002506 
002510 
002512 
002514 
002516 
002520 



002522 



002532 
002554 
002536 
002540 
002542 
002544 
002546 
002550 



002552 
002554 
002556 
002560 
002562 
002564 
002566 
002570 



002572 
002572 
002573 
0025 74 
002575 
002576 
002577 
002600 

ooaooi 



120400 
120401 
120402 
120403 
120404 
120405 
120407 
122000 



COOOOO 
000000 

oocooo 
oooooo 

000000 

oooooo 
oooooo 
oooooo 



oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 



377 
000 
000 
360 
000 
000 
347 



{TABLE OF USfRT REGISTER ADDRESSES 

I ADDRESS Of RDSRL 

j ADDRESS Of RDSRH 

{ADDRESS OF TDSRL 

jAODRESS OF TDSRH 

lAODRESS OF PCS4RL 

I ADDRESS OF PC5ARH 

jAODRESS OF PCR 

; ADDRESS OF USYRT STATUS REG 

,**•*« STORAGE FOP DATA READ IN ADDRESS TESTS **♦♦♦ 
REDDATt .BLKB 8. 



USYREG; .WORD 


120400 


.WORD 


120401 


.WORD 


120402 


.WORD 


120403 


.WORD 


120404 


.WORD 


120405 


.WORD 


120407 


.WORD 


122000 



u**** GEN'L PURPOSE SCRATCH STORAGE ***** 


REGO 


.WORD 







RF.G1 


.WORD 







REG2 


.WORD 







REG3 


.WORD 







REG4 


.WORD 







REG5 


.WORD 







REG6 


.WORD 







REG7 


.WORD 







it**** SCRATCH 


STORAGE 


FOR MESSAGE REPORTING ***** 


TMPO 


.WORD 







TMP1 


.WORO 







TMP2 


.WORD 







TMP3 


.WORD 







TMP4 


.WORD 







TMP5 


.WORD 







TMP6 


.WORO 







TMP7 


.WORD 







1 ***< 


>* INBUS LU 


REG BIT 


MASKS FOR UNPREDICTABLE BITS 


UPBF 


rs: 








.BYTE 


377 


jMASK FOR R06R 




.BYTE 


000 


i MASK FOR ROSR 




.BYTE 


000 


iMASK FOR TDBR 




.BYTE 


360 


,MASK FOR TOSR 




.BYTE 


000 


i MASK FOR SSAK 




.BYTE 


000 


I MASK FOR PCSAR 




.BYTE 


34 7 


,MASK FOR PCR 



200 



TQSRNRWi .BYTE 200 



I TOSR NON-R/W BITS 



\y\ 



CNOMOAO DMVL1 LINE UNIT DIAG2 
DATA TEST PATTERNS 



195? 






1934 






1935 


002602 




1936 


002602 


377 


193? 


002603 


377 


1938 


0O2604 


377 


1939 


002605 


377 


1940 


002606 


377 


1941 


002607 


377 


1942 


002610 


377 


1943 


002611 


366 


1944 






1945 






1946 


002612 




1947 


002612 


000 


1948 


002613 


000 


1949 


002614 


000 


1950 


CXJ2615 


000 


1951 


002616 


000 


1952 


002617 


000 


1953 


002620 


000 


1954 


002621 


110 


1955 






1956 






1957 


002622 




i95e 


002622 


ooo 


1959 


002623 


001 


1960 


002624 


003 


1961 


002625 


004 


1962 


0O2626 


005 


1963 


002627 


007 


1964 


0026 30 


100 


1965 


002631 


101 


1966 


002632 


103 


1967 


002633 


104 


1968 


002634 


105 


1969 


002635 


107 


1970 


002636 


000 


1971 


002637 


017 


1972 


002640 


027 


1973 


002641 


041 


1974 


002642 


200 


1975 


002643 


277 


1976 


0O2644 


103 


1977 


002645 


144 


1978 


0O2646 


115 


1979 


00264 7 


157 


1980 


002650 


000 


1981 






1982 






1963 


002651 




1984 


002651 


125 


1985 


0O2652 


252 


1986 


002653 


000 


1987 


0O2654 


377 


1988 


002655 


001 


1989 0Q2656 


002 



MACRO M1200 ;■>.< 


n FF.B-84 


15 5 39 PAGE 2 


.SBTTL 


DATA TEST PATTERNS 


( ***** 


DATA PATTERN E ***** 


PATE; 








.BYTE 


377 




.BYTE 


377 




.RYTE 


377 




.BYTE 


377 




.BYTE 


377 




.BYTE 


37 7 




.BYTE 


377 




.BYTE 


366 


; ***** 


DATA PATTERN F *♦♦*♦ 


PATF: 








.BYTE 


000 




.BYTE 


000 




.BYTE 


000 




,GYTE 


000 




.BYTE 


000 




.BiTE 


000 




.BYTE 


000 




.BYTE 


110 


. 44*4* 


DATA PATTERN G ***** 


ms; 








.BYTE 


000 




.BYTE 


001 




.BYTE 


003 




.BYTE 


0O4 




.BYTE 


005 




.BYTE 


007 




.BYTE 


100 




.BYTE 


101 




.BYTE 


103 




.BYTE 


104 




.BYTE 


105 




.BYTE 


107 




.BYTE 


000 




.BYTE 


017 




.BYTE 


027 




.BYTE 


041 




.BYTE 


200 




.BYTE 


277 




.BYTE 


103 




.BYTE 


144 




.BYTE 


115 




.BYTE 


157 




.BYTE- 


000 


J ***** 


DATA PATTERN XI ***** 


PATXil 








.BITE 


125 




.BYTE 


252 




.BYTE 


000 




.BYTE 


377 




.BYTE 


001 




.BYTE 


002 



SEQ 0042 



CNDMOAO DMVU I. INF. UNIT DIAG.2 
DATA TEST PATTERNS 



1990 


002657 


004 


1991 


002660 


010 


1992 


002661 


020 


1993 


002662 


040 


1994 


002663 


100 


1995 


0O2664 


200 


1996 


002665 


3 76 


1997 


002666 


375 


1998 


002667 


373 


1999 


002670 


367 


2000 


002671 


357 


2001 


002672 


337 


2002 


002673 


277 


2003 


002674 


1/7 


2004 


002675 


176 


2005 






2006 






2007 


002676 




20oa 


002676 


OOO 


2009 


002677 


041 


2010 


002700 


102 


2011 


002701 


143 


2012 


002702 


204 


2013 


002703 


245 


2014 


002704 


306 


2015 


OO2705 


34V 


2016 


002706 


OOO 


2017 


002707 


001 


2018 


002710 


002 


2019 


002711 


004 


2020 


002712 


040 


2021 


002713 


100 


2022 


002714 


200 


2023 


002715 


000 


2024 


002716 


346 


20dO 


002717 


3*5 


2026 


002720 


343 


2027 


0027^1 


307 


2028 


002722 


247 


2029 


002723 


147 


2030 


0O2724 


347 


2031 


002725 


242 


2032 


002726 


105 


2033 


002727 


547 


2034 


002750 


010 


2035 


002731 


020 


2036 


002732 


367 


2037 


002733 


357 


2038 


002734 


030 


2039 


0O2735 


027 


2O40 


002736 


377 


2041 






2042 






2043 


002737 




2044 


002/37 


000 


2045 


002 740 


ooo 


<>Q46 002741 


001 





r 4 


200 22 TEB-84 


15; 39 PAGE 23 1 


.6VTE 


004 


.BYTE 


010 


.BYTE 


020 


.BYTE 


040 


.BYTE 


100 


.BYTE 


200 


.BYTE 


376 


.BYTE 


375 


.BYTE 


373 


.BYTE 


367 


.BYTE 


357 


.BYTE 


337 


.BYTE 


277 


BYTE 


177 


BYTE 


176 


;**++* DATA PATTERN I ***** 


PATI: 




.BYTE 


000 


.BYTE 


041 


.BYTE 


102 


.BYTE 


143 


.BYTE 


204 


.BY T E 


245 


.BYTE 


306 


.BYTE 


347 


.BYTE 


000 


.BYTE 


001 


.BYTE 


002 


.BYTE 


004 


.BYTE 


040 


.BYTE 


100 


.BYTE 


200 


.BYTE 


000 


.BYTE 


346 


.BYTE 


345 


.BYTE 


543 


.BYTE 


307 


.BYTE 


24 7 


.BYTE 


147 


.BYTE 


347 


.BYTE 


242 


.BYTE 


105 


.BYTE 


34 7 


.BYTE 


010 


.BYTE 


020 


.BYTE 


367 


.BYTE 


357 


.BYTE 


030 


.BYTE 


027 


.BYTE 


377 


;>•*** DATA PATTERN J ***** 


PATJ? 




.BYTE 


000 


.BYTE 


000 


♦ BYTE 


OOi 



SEQ 0043 



CNDMDAO DMV11 I INF UNIT DIAG2 
DATA TEST PATTERNS 
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SEQ 0044 



2047 


002742 


002 


204rt 


002743 


004 


2049 


002744 


020 


2050 


002/45 


040 


2051 


002746 


010 


2052 






2053 






2054 


002 "M 7 




2055 


00274 7 


000 


2056 


002750 


37 7 


2057 


002751 


376 


2058 


002752 


375 


2059 


002753 


373 


2060 


0C2754 


376 


2->61 


002755 


177 


2062 


002756 


377 


2063 


002757 


000 


2064 


002760 


001 


2065 


002761 


002 


2066 


002762 


004 


2067 


002763 


010 


2068 


002764 


200 


2069 


002765 


125 


2070 


002766 


252 


2071 


002767 


000 


2072 






2073 






2074 


002 770 




2075 


002770 


000 


2076 


0027 n 


017 


2077 


002772 


016 


2078 


002773 


015 


2079 


002774 


013 


2080 


002775 


016 


2081 


002776 


017 


2082 


002777 


01"> 


2083 


0030O0 


000 


2084 


H03001 


001 


2085 


003002 


002 


2086 


003003 


004 


2087 


0O30O4 


010 


2088 


003005 


000 


2089 


003006 


005 


2090 


003007 


012 


2091 


003010 


000 



BYTE 
BYTE 
BYTE 
BYTE 
BYTE 



002 
004 
020 
040 
010 



;i**** DATA PATTERN K ***** 
PATK: 



BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
.BYTE 



000 
37 7 
376 
375 
373 
376 
177 
377 
000 
001 
002 
004 
010 
200 
125 
252 
000 



;»*+*« DATA PATTERN L ***** 
PATLt 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



000 
017 
016 
015 
013 
016 
017 
017 
000 
001 
002 
004 
010 
000 
005 
012 
000 



CNDMOAO ONVll LINt. UNIT D1AG2 
DATA TEST PATTERNS 
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2093 






2094 






209b 


003011 


000 


2096 


003012 


003 


2097 


003013 


014 


2098 


003014 


060 


2099 


003015 


001 


2100 


003016 


007 


2101 


003017 


037 


2102 


003020 


177 


2103 






2104 






2105 


003021 


000 


2106 


003022 


140 


2107 


003023 


030 


2108 


003024 


006 


2309 


003025 


100 


2110 


003026 


160 


2111 


003027 


K4 


2ii? 


3030 :s*: 


3.77 


2113 






2114 


0070 31. 




2115 






2116 






2117 






2118 


003032 




2119 






2120 






2121 






2122 







***** DATA PATTERN Q ***** 



f-'ATQt 



BYTE 

BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 



000 
003 
014 
060 
001 
00 7 
037 
177 



; * •* * + 

;>ATUB: 



DATA PATTERN 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BVTE 
.BYTE 
.BYTE 
.BYTE 



000 
140 
030 
006 
100 
160 
174 
177 



INVERTED Q ***** 

INVERTED 000 (7 BIT) 
INVERTED 003 (7 BIT) 
INVERTED 014 (7 BIT) 
INVERTED 060 C7 BIT) 
INVERTED 001 (7 BIT) 
INVERTED 007 (7 BIT) 
INVERTED 037 C7 BIT) 
INVERTED 177 (7 BIT) 



RJOPAT: 
.EVEN 

»+* RECEIVED DATA BUFFER (64 
^CVbUFi ,BLKW 64. 



WORDS) *** 



m 
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SEQ 0046 



2124 
2125 
2126 
2127 
2128 
2129 
2150 
2151 
2132 
2133 
2134 
2135 



003032 
003232 
003232 
003235 
003240 
003243 
003246 



115 
065 

117 
115 
066 



2136 
21.W 

213H 
2139 
2140 
2141 
2142 



000012 



STS - 



003252 
00325? 
00*252 
PART 2 OF 
003255 
003260 
003263 
003266 
00^271 
003274 
003277 
003302 
003305 
003310 
003Mb 
002316 



3/ 



2143 
2144 
2145 



104 

055 
040 
116 
125 
124 
105 
123 
040 
122 
CKV? 
106 
000 



C00010 



070 
06 3 
122 
070 
064 



lib 

061 
114 
105 
116 
(MO 
123 
040 
120 
124 
040 
040 



Oi'iO 

040 
040 

000 



126 

OM 
111 
040 

111 
124 

124 
C!>5 
101 
0*0 
117 
063 



.SB1TL GLOBAL TEXT SECTION 

i* THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
i* MESSAGES, ANO ASCII INFORMATION THAT ARE USED IN 
j * MORE THAN ONE TEST. 

;* NAMES OF DEVICES SUPPORTED BY PROGRAM 

• 1+ + + * + + + + + + + * + + + + + + + + + + + *** + + + + + * + + + + + + * +n + m + 4+mm + ±t ****************** 

DEVTYP <M8053 OR MB064> 

LfDVTYPj • 

.ASCIZ KM8053 OR M8064* 



.EVEN 

•********************+************************************4*****+***********« 

* TITLE OF PROGRAM 



, RADIX 10. 

DESCRIPT 



<DMV-H LINE UNIT TESTS - PART 2 QV 3> 

UQESC; 



.ASCIZ /DMV-11 LINfc UNIT TE 



.RADIX 8» 



♦ EVEN 



M 
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GLOBAL. SUBROUTINE SECTION 

2153 

2154 
2155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 



2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2175 
2174 
2175 
2176 
2177 
2176 
2179 
2180 
2181 
2182 
2185 
2184 
2185 



SEQ 0047 



003320 112777 



2186 
2187 
2188 
2189 
2190 
2191 
2192 
2193 



003326 
003330 
003334 
003336 

003341. 
003346 
003350 
003354 
003362 

003362 
003370 
003376 
00M04 
003412 
003414 
003416 
003420 



010346 
012703 
077301 
012603 

132777 
001023 
004737 
012737 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000207 



000301 
000030 



004154 
000301 



000001 
OOOC01 
01411S 
021274 



.SBTTL GLOBAL SUBROUTINE SECTION 



.S6TTL . ...M-LOOP -- MSTCi R -- MASTER CLEAR AND ENTER M-LOOP 

♦ + + *♦ 4. *** + + **** + **♦ + **♦*+*♦ + *+♦♦ *♦***** + * + + + + * + ♦ + ♦+** + *♦ + + + + * + + + **♦ +*,>♦****♦* 

MSTCLR - MASTER CLEAR 6 ENTER M-LOOP 

CALLING SEQUENCE: 

JSR PC MSTCt R 

BCC Ni* i IF NO ERROR OCCURED , PROCEED WITH ROUTINE 

ERROR ,AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL00P)> 

N*: <RESLHPTION OF NORMAL PROCESSING- 
177076 MSTCLR; MOVB •RUNJMCLRJMREQ.HBSELI sINITIATE M-LOOP 



II 



000200 .177060 



002330 



002176 
002200 
002202 
QQ224M 



5* 

9$ 



MOV 


R3, 


-(SP) 








MOV 


«24 


. ,R3 




jWAIT FOR THE M-LOOP TO FINISH THE OPERATION 


soe 


R3, 


It 








MOV 


(SP)*.R3 








BITB 


4MRDY.8BSEL2 


i n '.o THE M-LOOP FINISH 




BNE 


5$ 






r-r- GOOD. RETURN 




JSR 


PC 


GETWSR 




;■'■:'.. tiYTE SELECT REGISTERS 




MOV 


*PUN!HCLR! 


MR£f 


j.-.-\i":i jIOENTIFv REQUESTED ^UNCTION 




GTDF 


EM3 


,ERR4 




' : '„jY" TIMEOUT 

GUEk* "DEVICE FATAL" ERROR 9 1 

MOV 
MOV 
MOV 
MOV 


OT.EDF.ERRTYP 
n.ERRNBR 
*EM3,ERRMSG 
#ERR4,ERRBLK 


SEC 








j SET CARRY TO INDICATE ERROR 




BR 


91 






,EXIT WITH THE "ERROR" FLAG (CARRY BIT) 


SET 


CLC 








; CLEAR C BIT FOR NO ERRORS 




RTS 


PC 






jRETURN 





CNOMOAO DMV11 LINK UNIT DIAG2 
*« *. M-LOOP -- READ 



2195 
2196 
219.' 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2221 
2222 
2223 
2224 
2225 



2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2255 



003422 
003426 

003434 
003436 
003442 
003444 

003446 
003454 

003456 

003462 
003470 

003470 
003476 
003504 
003512 
003520 
003522 

003524 
003526 
003532 



012577 
112777 

010346 
012703 
077301 
012603 

132777 
001023 

004737 
012737 



012737 
012737 
012737 
012737 
OO0261 
000401 

CO0241 
117735 
000205 



177J04 
000001 



00C050 



004134 

oooo: l 



000001 
000002 
014141 

021274 



176704 
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.SBTTI M-LOOP -- READ 

Ri-IHD READ THE SPECIFIED ADDRESS WITHIN THE DMV-11 'M8053) 

CALLING SEQUENCE; 

!5R R5 READ 

/JORD <ADDRESS OF REGISTER WITHIN DMV-11> 

.WORD DESTINATION ADDRESS WITHIN LSI -11* 

ttr: N$ | IF NO ERROR OCCURED, PROCEED WITH ROUT INF 

ERROR j AN ERROR MESSAGE HAS BEEN STACKED: PRINT l\ 

<f\Ht OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL00P)> 

N$: 'RESUMPTION OF NORMAL PROCESSING* 



SEQ 0048 



176772 



000200 176752 



\jOc7 50 



002176 
002200 
002202 



****4^ + **4^***t******«*****^******************** + ***4^4^*********4^*******4^ 



READ 



!?•: 



5i: 



MOV 
MOVO 


(P5)»,8SF.L4 

•5: , JE0L0C.weSEL2 


MOV 
MOV 
SOB 

MOV 


f!3. (.SP) 
*40. ,R3 

r;\,i$ 

CSP)».R3 


PITB 
BNE 


*t19DY,SBSEL2 
5* 


JSR 
MOV 
GTDF 


PC.GETWSR 

OREDLOCGDATA 
EM4.ERR4 



BR 

CLC 

MOVB 
RTS 



6$ 



aB3EL6,a(R5)t 
R5 



j SETUP SOURCE POINTER 

jTELL H-LOOP TO GIVE US THE REQUESTED DATA 



{WAIT FOR THE M-LOOP TO FINISH THE OPERATION 



j DID THE M-LOOP FINISH 
;YES. ^OOO. RETURN 

iGFT BYTE SELECT REGISTERS 

I IDENTIFY REQUESTED FUNCTION 

•"MRDY" TIMEOUT 

; QUEUE "DEVICE FATAL" ERROR * 2 

MOV 
MOV 
MOV 
MOV 

a INDICATE AN ERROR HAS BEEN STACKED 

jRETLflN WITH THAT INDICATION 

jINOICATE "NO ERROR" 

j PUT DATA WHERE CALLfeR WANTS IT 

j RETURN 



*T.EDF,ERRTi'P 
♦2.ERRNBR 
♦EM4.ERRMSG 
OfcrtR4,ERRBLK 



CNDMOAO OMVU LINE UNIT DIAG2 

. ...M-LOOP -- READ IMMEDIATE 

2237 
2258 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
"5247 
2248 
2249 
22*iO 
2251 
2252 
2253 
2254 
2255 
2256 
2257 
2258 
2259 
2260 
2261 
2262 
2263 
2264 
2265 
2266 
2267 
2268 



2269 
2270 
2271 
2212 

2273 
2274 
2275 

22?6 
2277 

H270 



003534 
003534 
003540 

003546 
003550 
003554 
003556 

003560 
003566 

003570 
003574 
003602 

003602 
003610 
003616 
003624 

003632 
003654 

003636 
003640 
003644 



012577 
112777 

010346 
012703 
077301 
012603 

152777 
001023 

004 73 7 
012737 



012.737 
012737 
012737 
012737 
000261 
000401 

0O0241 
017725 
000HQ5 



176672 
000001 



000050 



004134 
000001 



OOOOOl 
000003 
014141 
021274 



17657, 
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SEQ 0049 



.SBTTL MLOOP - READ IMMEDIATE 

READI - READ IMMEDIATE THE SPECIFIED ADDRESS WITHIN THE DMV-11 (M8053) 

CALLING SEQUENCE: 

JSR R5 READI 

'.WORD <ADDRESS OF REGISTER WITHIN DMV-11> 
.WORD DESTINATION -- CONTENTS OF REG. IS PUT HERE> 
BCC N$ ,IF NO ERROR OCCURED. PROCEED WITH ROUTINE 

ERROR j AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL0OP)> 

N$: ^RESUMPTION OF NORMAL PROCESSING> 

-- + + >.*** + *** + + + +. + + 4. ±±t4,+. + + + + + 4,+, + t* + + +* + +4- + + i-±+> + + + ** + + + + + * + +-+ + +■ + ** ****** *+*.** + 

READI: 



176660 



1$ 



000200 176640 



002330 



002176 
002200 
002202 
002204 



MOV 
MOVB 

MOV 

MOV 

soe 

MOV 

BITB 
BNE 

JSR 
MOV 
GTDF 



51 
6$ 



SEC 
BR 

CLC 

MOV 
RTS 



(R5)*,aSEL4 
*REDL0C,a6SEL2 

R3 # -CSP) 
$40. ,R3 
R3,i* 
(SP)*.R3 

*HRDY,aeSEL2 
5* 

PC.GETUSR 

OflEDLOC.GDATA 

EM4.ERR4 



6$ 



astL6,(R^)* 

R5 



; SETUP SOURCE POINTER 

j TELL M-LOO* TO GIVE U5 THE REQUESTED DATA 



j WAIT FOR THE M-LOOP TO FINISH THE. OPERATION 



:DID THE M-IOOP FINISH 
j YES. GOOD. RETURN 

;GET BYTE SELECT REGISTERS 
j IDENTIFY REQUESTED FUNCTION 
t"MRDY" TIMEOUT 

; QUEUE "DEVICE FATAL" ERROR 9 

MOV 
MOV 
MOV 
MOV 
; INDICATE AN ERROR HAS BEEN STACKED 
{RETURN WITH THAT INDICATION 

{INDICATE "NO ERR06" 

;PUT DATA WHERE CALLER WANTS IT 

I RETURN 



ST.EDF.ERRTYP 
43.ERRN6R 
#£M4.ERRMSC 
0ERR4.ERRBLK 
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.M-LOOP -- WRITE 

2280 
???. 1 
2282 
2283 
2284 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
2293 
2294 
?295 
*296 



SEQ 0050 



.SBTTl M-l.OOP - - WRITE 

if*****.******************************************.**************************** 
WRITE - WRITE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS 

CALLING SEQUENCE: 

JSR R5, WRITE 

.WORD <ADDRESS OF REGISTER WITHIN 0MV-11> 

.WORD <ADDRESS OF DATA BYTE> 

BCC N$ j IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR i AN ERROR MESSAGE HAS BEEN STACKED; PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL0OP)> 

N$: RESUMPTION OF NORMAL PROCESSING> 



2AO0 
2301 

2302 
2303 



003646 
X)3652 
003656 



012577 
113577 
000404 



176560 
176560 



WRITE; 



MOV 


CR5)».8SFL4 


MOVB 


8(R5)*,aSEL6 


BR 


MLWRI 



SETUP SOURCE POINTER 

MAKE DATA AVAILABLE TO M-LOQP 

THE REST OF THIS ROUTINE IS THE SAME AS "WRITE I" 
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.M-) OOP 



230 7 
2308 
2309 
2310 
2311 
2312 
2313 
2314 
2315 
2316 
2 7,17 
2318 
2319 
2320 
2321 
2322 
2323 
2324 
2325 
2326 
2327 
2328 
2329 
2330 
2331 
2332 
2333 
2334 
2335 
2336 



WRITE IMMEDIATE 



SEQ 0051 



2337 
2338 
2339 
2340 
2341 
2342 
2343 
2344 

8345 



003660 
003660 
003664 
003670 

003676 
003700 
003704 
003706 

003710 
003716 
003720 
003724 
003732 

003732 
003740 
003746 
0037S1 
003762 
003764 

003766 
003770 



012577 
012577 
112777 

010346 
012703 
077301 
012603 

132777 
001023 
004737 
012737 



SBTTl M-l.OOP -- WRITE IMMEDIATE 

WRITEI - WRITE IMMEDIATE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS 

CALLING SEQUENCE; 

JSR R5.WRITEI 

.WORD <ADDRE5S OF REGISTER WITHIN DMV-11> 

.WORO <DATA FIELD -- DATA TO BE WRITTEN IN DMV-11 > 

BCC Hi j IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR } AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 



N$: 



<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKLOOP>> 
^RESUMPTION OF NORMAL PROCESSING 



176546 
176546 
000002 



000050 



- -*** A* **** + ** + + A *********** + * + * + **.* + * + ***** + + * + + + + + * + + * + *. + + + + + * + * + ****** + *♦ + 

WRITEI: 



176530 MLWRI: 



1$ 



000200 176510 



0O4134 
000002 



012737 000001 

012737 000004 

012737 014141 

012737 021274 
000261 
000401 

00024 1 
000205 



002330 



002176 
002200 
002202 
002204 



MOV 
MOV 
MOVB 

MOV 
MOV 
SOB 

MOV 

BITB 

BNE 

JSR 

MOV 

GTDF 



5$: 

6*; 



SEC 
BR 

CLC 
RTS 



CR5)» .SSEL4 
CR5)*,SSEL6 
*WRIL0C.SBSEL2 

R3.-CSP) 
*40. ,R3 
R3.ll 
CSP)*,R3 

0MRDY.S6SEL2 
5* 

PCGETWSR 

♦WRILOC.GDATA 

EM4.ERR4 



6$ 



R5 



jSETl*> SOURCE POINTER 

;MAKE DATA AVAILABLE TQ M-LOOP 

; TELL M-LOOP TO WRITE THE DATA 



jWAIT FOR THE M-LOOP TO FINISH THE OPERATION 



;DID THE M-LOOP FINISH 

lYES, GOOD. RETURN 

;GET BYTE SELECT REGISTERS 

j IDENTIFY REQUESTED FUNCTION 

("MRDY" TIMEOUT 

; QUEUE "DEVICE FATAL" ERROR * 4 

MOV 
MOV 
MOV 
MOV 

{INDICATE AN ERROR HAS BEEN STACKED 

j RETURN WITH THAT INDICATION 



OT.EDF.ERRTYP 
*4,ERRNBR 
0EM4.ERRMSG 
0ERR4.ERRBLK 



j INDICATE "NO ERROR" 
j RETURN 
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SEQ 0052 



2348 
2349 
2350 
2351 
2352 
2353 
2554 
2355 
2356 
2357 
2358 
2359 
2360 
2361 
2362 
2363 
2364 
2365 
2366 
2367 
2368 
2369 
2370 
2371 
2372 
2373 
23/4 
2375 
2376 
2377 
2378 
2379 
2380 
2381 
2362 
2383 
2384 
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392 



0037 72 
004000 
004006 
004014 
004022 
004030 
004036 
004044 
004052 
004060 
004066 
OO4074 
004102 
004110 
004116 
004124 

004132 



004134 
004142 
004150 
004156 
004164 
004172 
004 200 
004206 
004214 



117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
000207 



017737 
017737 
017737 
017737 
017737 
017737 
017737 
017737 
000207 



176424 
176420 
176414 
176410 
176404 
176400 
176374 
176370 
176364 
176360 
176354 
176350 
176344 
176340 
176334 
176330 



176262 

176260 
176256 
176254 
176252 
176250 
176246 
176244 



.SBTTL GETBSR -- GET BYTE SELECT REGISTERS 

► * +++*** + *++ ++****** + **+*+*+****+***+********************** + + **+++++ + **♦ + * + + * 

GET THE CUNTENTS OF ALL CONTROL AND STATUS REGISTERS 

FUNCTION - THIS SUBROUTINE COLLECTS THE CONTENTS OF THE 

BYTE SELECT REGISTERS FOR THE PURPOSE OF DISPLAr. 

ENTRY CONDITIONS - NONE 

EXIT CONDITIONS - NONE 

REGISTERS DESTROYED - NONE 

- - + ** + **** + ***** + *** + + **** + ***** + ***** + * + + *** + * + **♦ + *** + ** + * + **************** 



00 


a 


0000 





00 























00 





00 











00000 





00 


0000 


0000 









002206 
002210 
002212 
002214 
002216 
002220 
002222 
002224 
002226 
002230 
002232 
002234 
002236 
002240 
002242 
002244 



GETBSR: MOVB flBSELO.BSRO 

MOVB UBSEL1.BSR1 

MOVB QBSEL2.BSR2 

MOVB SGSEL3,BSR3 

MOVB S8SEL4,BSR4 

MOVB aeSEL5,nSR5 

MOVB aeSELC,BSR6 

MOVB 88SEL7,BSR7 

MOVB S8SEL10.BSR10 

MOVB seSELll.BSRll 

MOVB 88SEL12.BSR12 

MOVB aSSEL13,BSR13 

MOVB SBSEL14 t BSR14 

MOVB «BSEL15,BSR15 

MOVB S6SEL16.BSR16 

MOVB HBSEL17,BSR17 

RTS PC 



;PUT THE CURRENT CSR VALUES INTO THE PRINT -OUT 
;TABLE 



{RETURN TO CALLER 



.SBTTL GETUSR -- GET WORD SELECT REGISTERS 

; "UORD" VERSION OF ABOVE SUBROUTINE 



002206 
002210 
002212 
002214 
002216 
002220 
002222 
002224 



GETWSRj MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTS 



SSELO.USRO 

SSEL2.USR2 

SSEL4.WSR4 

aSEL6,USR6 

8SEL10.WSR10 

a5EL12,USR12 

6JSEL14.WSR14 

aSEL16,WSR!6 
PC 



;MOVE THE 4 WORD REGISTERS TO THE OTHERWISE 
;BYTE TABLE 



jRETURN TO CALLEFv 



P r. 

l ) > 

CNOMOAO DMVll LINE UNIT D1AG2 MACRO M1?00 22 TEB 84 15s 39 PAGE 32 

STUREG •* STATIC TEST OF SPECIFIED USYRT REGISTER 

STATIC TEST OF SPECIFIED USrRT REGISTER 



SEQ 0053 



2394 
2395 
2396 
239? 
2398 
2399 
2400 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
2411 
2412 
2413 

2414 004216 

2415 004222 
2416 

241? 004226 

2418 0O4232 

2419 004234 

2420 004236 
2*21 

2422 004240 

2423 004244 

2424 004250 

2425 004252 

2426 004254 
2427 

2428 0O4256 

2429 0O*264 
2430 

2431 004266 

2432 004270 

004270 
004276 
004304 
0O4312 

2433 004320 

2434 004X22 
2435 

24 36 

2437 

2438 

2439 

2440 

2441 

2442 004324 

2443 

2444 

2445 



010037 
01OO37 

004537 
000000 
002326 
105431 

005037 
004537 
000000 
002332 
105422 

123737 
000241 

001415 



012737 
012737 
012737 
012737 
000261 
000207 



000207 



004232 
004250 

003646 



002332 
003422 



002330 002332 



000001 
000005 

014347 
021420 



002176 
002200 
002202 
002204 



.SBTTL STUREG 

STUREG -- PERFORM A STATIC TEST OF THE SPECIFIED USYRT REGISTER 



CALLING SEQUENCE: 



Nl 



<R0 CONTAINS THE ADDRESS OF THE REGISTER TO BE TESTED* 

<"TC>ATA" CONTAINS THE TEST BYTE> 

<"f,OATA" CONTAINS THE EXPECTED DATA> 

<"Wr.GNUM" CONTAINS REG LflDEX FOR POSSIBLE ERRORS* 

JSR PC .STUREG 

BCC N* i IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR | AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKLOOP)> 

RESUMPTION OF NORMAL PROCESSING* 



STUREG; MOV 
MOV 



2* 



4$ 



JSR 
.WORD 
.WORO 
BCS 

CLR 

JSR 

,WORO 

.WORD 

BCS 

CMPB 

CLC 

BEQ 
GTDF 



R0.2I 
R0.4I 

R5, WRITE 


TDATA 
101 

BOAT A 

R5.REA0 



BOATA 

101 

GDATA.BDATA 



101 
EM25.ERR7A 



10$ 



SEC 

RTS 



PC 



»PUT SPECIFIED REGISTER'S ADDRESS IN I/O CALLS 



iWRITE IT 

!•** MOOIFIED FROM ABOVE *** 

ION ERROR, EXIT 

jCLEAR BOTH BYTES - JUST IN CASE.... 

iREAO IT BACK AGAIN 

!**• MOOTFIEO FROM ABOVE *** 

jON ERROR. EXIT 

iDIO WE READ WHAT UE WROTE? 

I (THIS ISN'T NEEDED FOP THE ERROR TEST BUT 

t MUST BE CLEARED ON EXIT IF NO ERROR OCCURED) 

jYES. EXIT FROM SUBTEST 

I REPORT REAO/WRITE ERROR 

I QUEUE "DEVICE FATAL" ERROR ♦ 5 

MOV 
MOV 
MOV 
MOV 

I INDICATE THAT AN ERROR WAS DETECTED 



♦T.EDf .ERRTtP 
♦5.ERRNBR 
0EM25.ERRMSG 
♦ERR7A.ERR9LK 



.S8TTL STALL -- DELAY FOR 10.5 MICRO-SEC'S (ON LSI-11) 

i STALL -- THIS SUBROUTINE STALLS FOR ABOUT 10.5 MICROSECONDS 

I - -*«***+* ************,********************4*************************** ******** 

STALL; RTS PC 
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SEQ 0054 



044/ 
«?44« 
0449 
0450 
0451 
0450 
0453 
0454 
0455 
0456 
0457 
0458 
2459 
0460 
0461 
0460 
0463 
2464 
0465 
0466 
2467 
046A 
0469 
0470 
0471 
04 72 
04 73 
2474 
24 75 
04 76 
0477 
24 76 
2479 
2480 
2481 
2482 
2483 
24 B4 
2485 
2486 
2487 
2488 
2489 
2490 
0491 
2492 
2493 
2494 
2495 
2496 
2497 



.SBTTL 



004326 
004334 

0O4342 
004346 
0O4352 
004354 

004356 
004362 
004366 
004370 

004372 
004376 
004404 

004406 
004414 
004422 



004426 
004434 
004442 
004446 
004452 
004454 
004456 
004m62 
0044 70 
0O44/6 
004500 



01273V 
012737 

005037 
004537 
122000 
000264 

005077 
004537 
000000 
000000 

005237 
023727 
001772 

062737 
023727 
001355 



004424 000207 



012737 
012737 
005077 
004537 
000000 
000000 
005237 
062737 
023727 
001361 
000207 



002246 
120400 

002264 
003420 



000006 
003422 



0O4366 
004366 



000002 
004366 



004 370 
004366 



♦ GETURS - LOAD INTO THE 8 WOW) STORAGE AREA CUREGS) THE CONTENTS OF THE 

♦ VARIOUS USYR 1 ! REGISTERS 
» 

♦ CALLING SEQUENCE: 

+ 



. + ♦ 



GETURSt MOV 
MOV 



120406 



004370 
120410 



3$: 

4$: 

51: 

6$: 



CLR 
JSR 
.WORD 
.WORD 

CLR 
JSR 
.WORD 
.WORD 

INC 
CMP 

BEQ 

ADO 
CMP 
BNE 

RTS 



*UREGS,5$ 

*USYRT,4$ 

UREGS»14, 
R5 C RF.A0 

UREGS»14. 

85$ 

R5.READ 





41 

4$,#USYRT*6 

6$ 

42,5$ 

4$,*U5YRT*10 
31 

PC 



lINIT POINTER TO REG STORAGE TABLE 
iINIT POINTER TO REGISTER ADDRESSES 

I CLEAR STORAGE WORD 

jREAD THE USYRT STATUS REGISTER 

jSTATUS REGISTER'S ADDRESS WITHIN DMV-U 

I ADDRESS ALLOCATED TO THAT REG. W/IN "UREGS 

jCLEAR STORAGE WORD 

iREAO A LINE UNIT REG 

»REGISTER AOORESS GOES HERE 

I STORAGE ADRS IN TABLE GOES HERE 

I INCREMENT REG NO. 

j THIS IS NOT A VALID REGISTER ADORESS 

I SO IT MUST BE BYPASSED 



i ADVANCE AOORESS 
I SEE IF ALL REGS 
iBR IF NOT 

I RETURN 



OF STORAGE 
READ YET 



AREA POINTER 



l* GETVRS: - LOAD INTO THE 16 
l* VARIOUS VIA REGISTERS 

j* CALLING SEQUENCE : 



WORD STORAGE AREA CVREGS) THE CONTENTS OF THE 



002266 
120OO0 
000006 
003422 



0O4452 
000002 
004452 



004454 
004452 



i 



GETVRS: MOV 

MOV 



004454 

120020 



31: 

41: 

5$: 
6*1 



CLR 

JSR 

.WORD 

.WORD 

INC 

ADO 

CMP 

BNE 

RTS 



OVREGS.SI 

♦VIA.4I 

851 

R5.READ 





4$ 

#2.5$ 

4$,#VIA+16. 
3$ 

PC 



iINIT POINTER TO REG STORAGE TABLE 

iINIT POINTER TO REGISTER ADDRESSES 

iCLEAR STORAGE WORD 

iREAO A VIA REG 

iREGISTER AOORESS GOES HERE 

i STORAGE AORS IN TABLE GOES HERE 

I INCREMENT REG NO. 

I INCREMENT STORAGE AORS 

i SEE IF ALL VIA REGS READ YET 

t BR IF NOT 

1 RETURN 
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INITT1 -- I 


MlTlALl^t TIMER 


2499 








2500 








2501 








2502 








2503 








2504 








2505 








2306 








2507 








2506 








2509 








2510 








2511 








2512 








2513 








2514 








2515 








2516 








251/ 








2518 








2519 








2520 








2521 








2522 








2523 








2524 








2525 








2526 


004502 


010146 




2527 


004 504 


012537 


004626 


252ft 


004510 


012537 


004654 


2529 


004514 


111501 




2530 


004516 


143701 


000077 


2531 


004522 


010137 


004616 


2532 


004526 


112501 




2533 








2534 


0O4530 


106301 




2535 


004532 


106301 




2536 








2537 








2538 








2539 








2540 


004534 


143701 


000177 


2541 


004540 


153701 


000100 


2542 


004544 


010137 


004556 


2543 








2544 


004550 


0O*537 


003660 


2545 


004554 


120016 




2546 


004556 


000000 




2S4 7 








2548 


004560 


0O4537 


003534 


2549 


004564 


12O013 




2550 


004566 


000000 




2551 








2552 


0O4570 


013701 


004566 


2553 


004574 


143701 


000300 


2554 


004600 


053701 


004616 


2555 


004604 


010137 


004616 



SEQ 0055 



BTTL INITT1 - INITIALIZE TIMER 01 

INITT1 • INITIALIZE TIMER <? 1 

CALLING SEQUENCE! 

JSR R5.INITT1 

.UORD < VALUE LOADED INTO THE Tl LATCH & VIATIC 6 VIAT1D> 

.WORD <VALUE LOADED INTO "TIL L" C "T1C-H"> 

.BYTE <BITS 6 £ 7 WILL BE LOADED INTO "ACR", BIT 5 WILL BE 

USED TO SET OR CLEAR BIT 6 ("Tl") OF THE INTERRUPT 

ENABLE REGISTER C"IER")> 
.BYTE <UNUSED> 

NOTE: 

BEFORE LOADING AND STARTING THE COUNTER, THE LATCH REGISTER (ACCESSED THRU 
"VIATIC") IS LOADED. THEN, T1L-L IS LOAGED AND NEXT, T1C-H. THIS LAST 
LOAD WILL RESET THE TIMEOUT BIT AND COUNTER LOGIC. IT IS EXPECTED AT THIS 
TIME (5/25/79) VrAX THE INTERRUPT FACILITY OF THE VIA CHIP WILL NOT BE USED 
-- HOWEVER. ACCESi TO THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE THIRD 
PARAMETER IN THE C,\LLING SEQUENCE (B T T 5 - WILL CAUSE THIS ROUTINE TO 
CLEAR THE ENABLE BY ("Tl") IN "IER", ; 

****** *******.*+,*.*. + ***.,** + *** A,***,*,****. **************************************** 

SAVE THE REGISTER WE UILL BE USING 
SETUP VALUE TO BE WRITTEN IN LATCH 
SETUP VALUE TO BE WRITTEN IN COUNTER 
GET ^ PROCESS BITS FOR ACR 6 6 7 

SETUP CALL SET ACR'S BITS 6 6 7 

NOW, GET THE BIT TO BE USED IN SETTING OR 

CLEARING BIT 6 OF "IER" 

THE PASSED BIT IS IN THE WRONG POSITION 

BUT. THE PASSED BIT SHOULD CONTROL THE OPERATION 

WE KNOW WE ARE SETTING OR CLEARING BIT 6 - 

THUS, THE PASSED BIT WILL BECOME THE CONTROLLING 

BIT 7 ANO WE WILL H 0R" IN THE BIT WE WISH TO 

BE CONTROLLED (BIT 6). 

FIRST, MAKE SURE ALL UNWANTED BITS ARE CLEARED 

THEN SET BIT 6 

THE CALL WILL NOW WRITE THE APPROPRIATE VALUE 

WRITE TO 

THE VIA 1 S IER 

INTERRUPT ENABLE/DISABLE INFORMATION 

READ THE CURRENT SETTING OF * 

THE VIA'S ACR 

INTO "31" 

GET THAT VALUE 

CLEAR THE CURRENT SETTING Of BITS 6 L 7 

SET THEM ACCORDING TO THE PASSED VALUES 

PASS TH£ NEW REG. SETTING TO APPROPRIATE CALL 



INITT1: MOV 


Rl.-(SP) 


MOV 


CR5)*.7$ 


MOV 


(R5)».10$ 


MOVB 


CR5),R1 


BICB 


077, Rl 


MOV 


R1.4* 


MOVB 


(R5)f,Rl 


ASLB 


Rl 


ASLB 


Rl 



i: 



3*: 



BICB 
BISG 

MOV 

JSR 

VIAIER 
.WORD 

JSR 

VIAACR 

.WORD 

MOV 
BICB 
BIS 
MOV 



177, Rl 
100, Rl 
R1.2I 

R3.WRITEI 



R5.REA0I 



31, Rl 
300, Rl 
4i,Rl 
R1.4I 



E :c 



CNDMOAO DMVil L INF. UNI! DIAGc? 



.INITT1 -- INITIALIZE TIMER 


2556 








2557 


004610 


004537 


003660 


2558 


004614 


120013 




2359 


004616 


000000 




2560 








2561 


004620 


004537 


003660 


2562 


004624 


120006 




2563 


004626 


000000 




2564 








2565 


004630 


113737 


004627 


2566 


004636 


0O4537 


003660 


2567 


004642 


120007 




2568 


004644 


000000 




2569 








2570 


004646 


004537 


003660 


2571 


004652 


120004 




2572 


004654 


oocooo 




2573 








2574 


0O4656 


113737 


004655 


2575 


0O4664 


004537 


003660 


2576 


0046/0 


120005 




2577 


004672 


000000 




2578 








2579 








2580 








2581 


004674 


012601 




2582 


0O4676 


005205 




2503 








2584 








2585 


004700 


000205 




2586 








2567 
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#1 



004644 



004672 



n$ 



7$ 



8$ 



10$ 



11$ 



JSR 
VIAACR 

.WORD 

JSR 

VIATIC 

.WORD 

M0V8 
JSR 

VIAT1D 
.WORD 

JSR 

VIAT1A 

.WORD 

MOVB 
JSR 

VIAT1B 
.WORD 



R5.WRITEI 



R5. WRITE! 



/•♦1,8$ 

R5.WRITEI 


R5.WR1TEI 



101*1.11$ 

R5.WRITEI 





SEQ 0056 



tWRITE TO 

jTHE VIA'S ACR 

I THE NEW REGISTER SETTING 

;WRITE TO 

,LOW ORDER LATCH REGISTER (T1L-L) 

I THE VALUE PASSED 

I SETUP FOR ANO 

jWRITE TO 

jHIGH ORDER LATCH REGESTER CT1L-H) 

;THE VALUE PASSED 

I WRITE TO 

lLOW ORDER LATCH G COLTER CT1L-L 6 T1C-L) 

j THE VALUE PASSED 

j SETUP FOR AND 

jWRITE TO 

iHIGH ORDER COUNTER (T1C-H) <ALSO STARTS CTR> 

j THE VALUE PASSED 



I DON'T WAIT AROUND FOR ANYTHING TO HAPPEN 



JUST Cv.'EST) RETURN! 



MOV 
INC 



RTS 



(SP)*,R1 
R5 



R5 



jBUT FIRST RESTORE Rl 

;ANO PUT R5 BACK ON A WORD BOUNORY (THE LAST 

, PASSED PARAM. WAS A BYTE. NOT A WORD!) 

I NOW, RETURN 



f 
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....INITT2 -- INITIALIZE HHER #2 



SEQ 0057 



2589 
2590 
2591 
2592 
2593 
2594 
2595 
2596 
2597 
2596 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2606 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 
2630 
2631 
2632 
2633 
2654 
2635 
2636 
263 7 
2638 
2639 
2640 
2641 
2642 
2643 
2644 
2645 



0O4702 
004704 
004710 
0O4712 
004716 
004722 

004724 
0O4726 
0O4730 



0O4732 
0O4736 
004742 

0O4746 
004752 
0O47S4 

0O4756 
0O4762 
0O4764 

004766 
004772 
0O4776 
005002 



010146 
012537 
111501 
143701 
010137 
112501 

106301 
106301 
106301 



143701 
153701 
010137 

004537 
120016 
000000 

004537 
120013 
000000 

013701 
143701 
053701 
010137 



CALLING SEQUENCE: 



■SBTTL INITT2 -- INITIALIZE TIMER 02 

; ***************************************************************************** 

j* INITT2 - INITIALIZE TIMER # 2 

* 

* 
* 

:* 
;* 
i* 

♦ NOTE 

* 



JSR 

.UORD 

.BYTE 



.BYTE 



R5.INITT2 

< VALUE LOADEO INTO "T2L-L" & "T2C-H"> 

<BIT 5 WILL BE LOADED INTO 

TO SET OR CLEAR BIT 5 

REGISTER C"IER")> 

< UNUSED > 



("T2 



"ACR 1 
) OF 



. BIT 4 WILL BE USED 
THE INTERRUPT ENABLE 



FIRST T2L-L IS LOADED. THEN T2C^H. THIS SECONO LOAD WILL RESET THE TIMEOUT 
BIT AND COLTER LOGIC. IT IS EXPECTED AT THIS TIME C5/25/79) THAT THE 
INTERRUPT FACILITY OF THE VIA CHIP WILL NOT BE USED -- HOWEVER. ACCESS TO 
THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE SECONO PARAMETER IN THE 
CALLING SEQUENCE (BIT 4 - WILL CAUSE THIS ROUTINE TO CLEAR THE ENABLE BIT 
C"T2") IN "IER".) 



j ******* ******************************** ***************** ********************* 



005024 

000337 
005014 



INITT2: MOV 
MOV 
MOVB 
BICB 
MOV 
MOVB 

ASLB 
ASLB 
ASLB 



000177 
000040 
004754 

003660 



003534 



0O4764 
000040 
005014 
005014 



2$: 



3$: 



Rl.-(SP) 

(R5)*.10$ 

(R5),R1 

337, Rl 

R1.4I 

CR5)*,R1 

Rl 
Rl 
Rl 



005006 004537 003660 



BICB 
BISB 

MOV 


177. Rl 
040. Rl 
Ri.2* 


JSR 

VIAIErt 

.WORD 


R5.WRITEI 




JSR 

VIAACR 

.WORD 


R5.READ1 



MOV 
BICB 

BIS 
MOV 


31, Rl 
040.R1 
-M.R1 
R1.4I 


JSR 


R5.WRITEI 



SAVE THE REGISTER WE WILL BE USING 
SETUP VALUE TO BE WRITTEN IN COUNTER 
GET £ PROCESS BIT FOR ACR 5 

SETUP CALL TO SET OR CLEAR ACR'S BIT 5 

NOW. GET TfC BIT TO BE USED IN SETTING OR 

CLEARING BIT 5 OF "IER" 

THE PASSED BIT IS IN THE WRONG POSITION 

BUT. THE PASSED BIT SHOULD CONTROL THE 

OPERATION. 

WE KNOW WE ARE SETTING OR CLEARING BIT 5 - - 

THUS. THE PASSED BIT WILL BECOME THE CONTROLLING 

BIT 7 AND WE WILL "OR" IN THE BIT WE WISH TO 

BE CONTROLLED (BIT 5). 

FIRST. MAKE SURE ALL UNWANTED BITS ARE CLEARED 

THEN SET BIT 5 

THE CALL WILL NOW WRITE THE APPROPRIATE VALUE 

WRITE TO 

THE VIA'S IER 

INTERRUPT ENABLE/DISABLE INFORMATION 

READ THE CURRENT SETTING OF 
THE VIA'S ACR 
INTO "3$" 

GET I'HAT VALUE 

CLEAR THE CURRENT SETTING OF BIT 5 

SET IT ACCORDING TO THE PASSED VALUE 

PASS NEW REG. SETTING TO APPROPRIATE CALL 

WRITE TO 



1 J 



CNDMDAO 0MV11 LINE UNIT QIAG2 
....IMITT2 -- INITIALIZE TIMER #2 



MACRO M1200 ere: 



2646 
264 7 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 



005012 120015 

005014 000000 

005016 004537 003660 

005022 120010 

005024 OOOOOO 



4$ 



10$ 



>2 TEB-84 15; 39 PAGE. 35-1 



005026 113737 005025 005042 

005034 004537 003660 

005040 120011 

005042 OOOOOO 11$: 



VIAACR 
.WORD 

JSR 

VIAT2A 

.WORD 

MOVB 
JSR 

VIAT2B 
.WORD 




R5.WRITEI 



10*»1,11$ 
R5.WRITEI 





>EQ 0058 



I THE VIA'S ACR 

jTHF NEW REGISTER SETTING 

i WRITE TO 

jLOW ORDER LATCH £ COUNTER CT2L-L 6 T2C-L) 

iTHE VALUE PASSED 

j SETUP FOR AND 

{WHITE TO 

{HIGH OflDER COUNTER (T2C-H) <ALSO STARTS CTR> 

;THE VALUE PASSED 



j DON'T WAIT AROUND FOR ANYTHING TO HAPPEN -- JUST (JEST) RETURN! 



005044 012601 
005046 005205 



005050 000205 



MOV 
iNC 



rt: 



(SPV.Rl 
R5 



R5 



jBUT FIRST RESTORE Rl 

j AND PUT R5 BACK ON A WORD BOUNORY C THE LAST 

{PASSED PARAM, WAS A BYTE, NOT A WORD! ) 

jTHEN RETURN 
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....RSTCHK -- RESET USYRT.'VERIFY ALL USYRT REGS 3 RESET STATE 



SEQ 0059 



2667 
2668 
2669 
2670 
2671 
2672 
26 73 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2^>33 
2684 
2685 
2686 
2687 
2688 
2689 
2690 
2691 
2692 
2693 
2694 
2695 
2696 
2697 
2696 
2699 
2700 
2701 
2702 
2703 



2704 
2 705 
2706 
2707 
2/08 
2709 
2710 
2711 
2712 
2713 
2/14 
2715 



005052 
005052 
005054 

005056 
005062 
005064 
005066 
005072 
005074 

005076 
005100 
005104 
005112 
005116 
005120 
005122 
005126 

005130 
005134 
005140 
005144 
005152 

005160 

0O5160 
005166 
005174 
005202 
005210 
005212 

005214 
005220 
0O5224 
005226 
005230 
005232 
005234 



010146 
010246 

004537 
120000 
OOC031 
004537 
120000 
000030 

005001 
012702 
016137 
004537 
000000 
OOOOOO 
123722 
001432 

010137 
006237 
005037 
11623/ 
013737 



012737 
012737 
012737 
012737 
000261 
000406 

062701 
020127 
002727 
000241 

012602 
012601 
000205 



003660 



003660 



002612 
002502 
003534 



0O5120 



002342 
002342 
002330 
177777 
005120 



000001 
000006 
014046 
021540 



000002 
000020 



SBTTl RSTCHK -- RESET USYRT/VERIFY ALL USYRT REGS S RESET STATE 

VERIFY THAT ALL USfRT REGISTERS 
ERROR MESSAGE IDENTIFYING THE 



RSTCHK - MANUALLY RESET THE USYRT AND 
ARE IN THEIR RESET STATE. AN 
FAILING REGISTER IS STACKED IF ONE IS ENCOUNTERED. 

CALLING SEQUENCE: 

JSR R5, RSTCHK 

+ + * + + + + + + +* + 4. + *4. + 4. + k4< + + * + * + + + ***+4 l *** + + *t + * + + + + ** + + + + 4 l *4 l , + +tt + + ******** 



RSTCHK: 



MOV 
MOV 



Rl, -CSP) 
R2.-CSP) 



005116 6$: 

7$; 
8$: 



002330 
002332 



002176 
002200 
002202 
002204 



jsr rs, write: 

VIAORB 

DTR!RTSND!PRESET 

JSR R5, WRITE! 
VIAORH 
DTRJRTSNO 

CLR Rl 

MCV «f>ATF.R2 

MOV USYREGCR1),7$ 

JSR R5.READI 

.WORD 

.WORD 

CMPB 6I.CR2)* 

BEQ 91 

MOV Rl.REGNUM 

ASR REGNUM 

CLR GOATA 

MOVB -1CR2).G0A1,\ 

MOV 8*,B0ATA 



{SAVE Rl 
j SAVE R2 

j SET PROGRAM RESET BIT IN VIA ORB REG 



j CLEAR PROGRAM RESET BIT IN VIA ORB REG 



lINIT USYRT REG ADRS PTR 

jINIT DATA PATTERN POINTER 

j SET USYRT READ ADORESS 

{READ A USYRT REG 

jUSYRT REG ADRS GOES HERE 

;DATA READ IS RETURNED HERE 

{SEE IF REG CONTAINS EXPECTED DATA 

jBR IF MATCH 

iSET USYRT REG NO. EUR PRINTOUT 
jGET WORD OFFSET 
;GET EXPECTED DATA 

{GET ACTUAL DATA 



{STACK "US\RT NOT CLEARED BY PROGRAM RESET" MSG 
GTDF EM2.ERR10 

{ QUEUE "DEVICE FATAL" ERROR 6 

MOV 
MOV 
MOV 
MOV 
SEC ,SET C BIT TO FLAG ERROR 



*T.EDF,ERRTYP 
*6,ERRNBR 
*fM2.ERRMSC 
0ERR1O.ERRBLK 



OR 



10$ 



9$: 



10$ 



ADD 


02.R1 


CMP 


R1.016. 


BLT 


6$ 


CLC 




MOV 


(SP)»,R2 


MOV 


(SP)*.R1 


RTS 


R5 



{TAKE ERROR EXIT 

jINCR USYRT REG ADRS PTR 
;SEE IF ALL REGS READ YET 



j BR IF NOT 
;♦♦ CLEAR C 
{RESTORE R2 
{RESTORE Rl 
j** RETURN 



BIT FOR NO ERRORS 



r- 



) 
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RSTCHK -- RESET USYRTWERIFY ALL USYRT REGS S RESET STATE 



SEQ 0060 



2717 
2718 
2719 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
2733 
2734 
2735 
2736 
2737 
2738 
2739 
2740 
2741 
2742 
2743 
2744 
2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2753 
2754 
2755 
2756 
2757 
2758 
2759 
2 760 
2761 
2762 
2763 
2764 
2765 
2766 
2767 



005236 
005240 
005244 
005246 
005250 



005252 
005252 
005256 
005260 
005262 
005266 
005270 
005272 
0O5276 
005300 
005302 
0O5306 
005310 
005312 
005316 
005320 
005322 
0O5326 
005330 
C05332 
005336 
005340 
005342 



010146 

012701 000005 

077101 

012601 

000207 



0O4537 
12<YK? 
00037/ 
004537 
120003 
000001 
004537 
120017 
OOOOOO 
0O4537 
120000 
000030 
0O4537 
120013 
000350 
004537 
120014 
000022 
0O4537 
120016 
000177 
000207 



003660 
003660 
003660 
003660 
003660 
003660 
003660 



;t************4******************************4-**************4***************** 

;* UAIT50 • THIS SUBROUTINE STALLS FOR AT LEAST 50 MICRO-SEC, AND THEN RETURNS 

;*********^***^^*************;4c************* J ***4* l *******«i** J **««.4 l *««««4 l4E4;A4l 4 l A A «4 [ 

WAIT50; MOV Rl.-CSP) j SAVE Rl 

MOV S5..R1 i INIT COUNTER 

3$i SOB Rl,3$ jDELAY HERE FOR 23,8 MICRO-SEC'S 

MOV CSPV.P1 (RESTORE Rl 

RTS PC {RETURN 

; OVERHEAD CJSR, MOV, MOV, MOV , £ RTS) ADD UP TO 25.25 MICRO-SEC'S 
; THEREFORE, ACTUAL TOTAL DELAY IS 49.35 MICRO -SECONDS 



.SBTTL SETVIA -- SET UP VIA REGISTERS 

*************«***i4.******4.******* l **** l 4i* u **.**i«***;*i** L * I ****** t * l *** L «*4 1 ^**« 1 *«4 l «***^« 

SETVIA - SET UP THE VIA REGISTERS 

THIS SUBROUTINE PROGRAMS THE VIA REGISTERS FOR NORMAL OPERATION, BY 
LOADING THE DDRB. DORA, ORB, ACR, PCR, IER, 

CALLING SEQUENCE : 
JSR PC, SETVIA 

*********************** ******** ********** ********** ************************* 

SETVIAt 

l SET POkT B FOR OUTPUT MODE 

j SET PORT A FOR INPUT HGOfc 
; CRITO IS ONLY OUTPUT BIT) 

{DISABLE USYRT INTERNAL LOOPBACK 
j INIT PORT B 



JSR 


R5,WRITEI 


VIADPB 




377 




JSR 


R5.WRITEI 


VIADPA 




001 




JSR 


R5.WRITEI 


VIAORA 




000 




JSR 


R5, WRITE I 


VIA0R8 




DTRSRTSND 


JSR 


R5.WRITEI 


VIAACR 




350 




JSR 


R5.WRITEI 


VIAPCR 




022 




JSR 


RS.WRITaX 


VIAIER 




177 




RTS 


PC 



j SET ACR FOR 



j SET PCR FOR 



} 



{DISABLE ALL MICRO -INTRPTS 
j RETURN 



Tl SQUARE UAVE OUTPUT MOOE , 
T2 ONE -SHOT OUTPUT MOOE, 
SR AT SYS CLOCK RATE ON CB1 
CB1 MEG TRANS INPUT MOOE. 
CA2 NEG TRANS INPUT MOOE, 
CA1 NEG TRANS INPUT MOOE 



CNDMOAO DMV11 LINE UNIT DIAG2 

INIDMV -- INIT OMV CMCLR, VIA SETUP) 

2769 
2770 
277L 
2772 
2775 
2774 
2775 
2/76 
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SEQ 0061 



<:< < < 
2778 
2779 
2780 
2781 
2782 
2783 
2784 
2785 
2786 
2787 
2788 
2789 
2790 
2791 
2792 
2793 
2794 
2795 
2796 
2797 
2798 
2799 
2800 
2801 
2802 
2803 
2804 



2805 
2806 
280 7 
2803 
2809 
2810 
2811 



005344 
005350 
005354 



005356 
005356 
005362 
005364 
005366 
005372 
005374 

005376 
005404 
005412 
005416 

005424 

0O5424 
005432 
00*440 
005446 
00 f 3454 
005456 
005460 



004737 003320 
004 737 005252 
000207 



0O4537 

122000 
OOOOOO 
122537 
00024 1 
001430 
012737 
016537 
005037 
113737 



012737 
012737 
012737 
012737 
0O0261 
005205 
000205 



003534 



005364 



000007 
177777 
002332 
005364 



oooooi 

000007 
015500 
021540 



.SBTTl INIDMV -- INIT DMV CMCLR. VIA SETUP) 

} ***************************************************************************** 

j+ INIDMV - THIS SUBROUTINE INITIALIZES THE DMV-11, BY DOING A MASTER CLEAR, 
;+ ENTERING THE M-LOOP, AND PROGRAMMING THE VIA REGS FOR DEFAULT 
j* OPERATION. 

J* 

j* CALLING SEQUENCE : 
}♦ JSR PC, INIDMV 

;********* ***** ******** ************************ *** **************************** 

INIDMV* JSR PC.MSTCLR iMASTER Cl.R, M-LOOP 
JSR PC.SETVIA {PROGRAM VIA 
RTS PC > RETURN 



.SBTTL ....CKUSTS -- CHECK USYRT STATUS REGISTERS 

*+******+**#***************•*************♦•**************♦•**«**♦*********** 

CKUSTS - THIS SUBROUTINE CHECKS THE USYRT STATUS BY READING THE USYRT 

STATUS REGISTER ANO COMPARING IT TO THE LOW BYTE OF THE WORD FOLLOWING 
THE CALL. IF THERE IS A MISMATCH, THE SUBROUTINE STACKS THE ERROR 
INFORMATION, AND SETS THE "C" BIT AND RETURNS. 
********************************************************* ******************* 

CKUSTS j 

j READ USYRT STATUS REGISTER 



1* 



002342 
002330 

002332 



002176 
002200 
002202 
002204 



; STACK 



JSR 


R5.READI 


USTATR 




.WORD 





CMPB 


CR5)*,1* 


CLC 




BEQ 


2% 


MOV 


*7,REGNUM 


MOV 


-1(R5).GDATA 


fLR 


BOAT A 


MOVB 


ll.BDATA 


"USYRT 


STATUS INCORRECT 


GTDF 


EM68.ERR10 



{SEE IF STATUS MATCHES EXPECTED 

{CLEAR C BIT 

jBR IF STATUS OK 

{SET USYRT REG NO. FOR PRINTOUT 

iGET EXPECTED DATA 

{GET ACTUAL DATA 



ERROR 



QUEUE 



21 



SEC 
INC 
RTS 



R5 
R5 



{SET C BIT 
i INCREMENT 
{RETURN 



"DEVICE FATAL" 


ERROR 9 1 






MOV 


ST.EDF.ERRTYP 




MOV 


♦7.ERRNBR 




MOV 


*EM68,ERRMSG 




MOV 


0ERR10.ERRBLK 



FOR ERROR 

R5 PAST ARGUMENT 
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CKTACT -- CHECK TRANSMITTER ACTIVE CTXACT) 



SEQ 0062 



2613 
2814 
2815 
2816 
2817 
2818 
2819 
2(?20 
2321 
2822 
2823 
2824 
2825 
2826 
2827 
282cJ 
2829 
2830 
2831 
2832 
2833 



2834 
2835 
2836 
2837 
2838 
2839 



2540 
2541 
2542 
254 3 
2544 
2545 
2546 
2847 



005462 
005462 
005470 
005474 
005476 
005500 
005504 
005506 
005514 

005516 

005516 
005524 
005532 
005540 
005546 
005550 
005552 
005560 

005562 

005562 

005570 
005576 
005604 
005612 
005614 
005616 
005620 



012737 
004537 
122000 
OOOOOO 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
0O0261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
0002M 
000401 
000241 
000205 



000007 
003534 



000001 
000004 



000001 
000010 
015527 
021714 



000001 
00O011 
015545 
021714 



002342 



005476 



002176 
002200 
002202 
002204 



002176 
002200 
002202 
002204 



.SBTTL CKTACT -- CHECK TRANSMITTER ACTIVE CTXACT) 

{* CKTACT - THXS SUBROUTINE CHECKS FOR THE PROPER STATE Of- TXACT IN THE 
STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERTY SET 
STATE OF BIT IN THE WORD FOLLOWING THE CALL. 



+ 
+ 

J* 

* 



* 4 * i A * * 

U5YPT 
TO THE 



CALLING 

JSR 

.WORD 



SEQ'JENCE 
R5, CKTACT 
<BIT IS 



EXPECTED VALUE OF TXACT> 

CKTACT: 

♦7.REGNUM i SET REG NO. FOR POSSIBLE ERROR REPORT 
R5.READI {READ USYRT STATUS 



***++++ 



1$ 



; STACK 



MOV 
JSR 
USTATR 
.WORD 
BIT 
BEQ 
BITB 
BNE 
"TXACT 
GTDF 





46IT0.CR5)* 
21 

OTXACT. 1* 
31 
NOT SET 1 * MSG 
EM69,ERR12 



{GET EXPECTED STATt OF 
{BR IF EXPECTED TXACT 



TXACT 




j SEE 
j BR 



IF TXACT 
IF TXACT 



000004 005476 2* 



{STACK 



SEC 




BR 


4$ 


BITB 


♦TXACT, 1* 


BEQ 


3$ 


"TXACT 


NOT CLEARED" 


GTDF 


EM70,ERR12 



MSG 



QUEUE "DEVICE FATAL" 



SET C BIT TO FLAG ERROR 
TAKE ERROR EXIT 
SEE IF TXACT - 
{BR IF TXACT » 



ERROR 8 




MOV 


♦T.EDF.ERRTYP 


MOV 


♦8 , ERRNBR 


MOV 


0EM69.ERRMSG 


MOV 


0ERR12.ERRBLK 



3* 
4$ 



SEC 
BR 
CLC 
RTS 



4$ 

R5 



QUEUE "DEVICE FATAL 



I SET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

j CLEAR C BIT FOR NO ERRORS 

{RETURN 



ERROR * 
MOV 
MOV 
MOV 
MOV 



*T.EDF,ERRTYP 
♦9, ERRNBR 
OEM70.ERRMSG 
*ERR12,ERRBLK 



) 
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.♦..CKRACT -- CHECK RECEIVER ACTIVE (RXACT) 



SEQ 0063 



2849 
2050 
2851 
2852 
2853 
2854 
2855 
2<?56 
2G57 
2858 
2859 
2860 
2861 
2862 
2863 
2864 
2865 
2866 
2867 
2868 
2869 



2870 
28 71 
2872 
2873 
2874 
2875 



2876 
2877 
2878 
2879 
2880 
2881 
2882 
2883 



005622 
005622 
005630 
005634 
005636 
005640 
005644 
005646 
005654 

005656 

005656 
005664 
005672 
005700 
005706 
005710 
005712 
005720 

005722 

005722 
005730 
005736 
005744 
005752 
005^54 
005756 
005760 



012737 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 
000423 
152737 
001416 



012737 
012737 
012737 
012'37 
000261 
000**01 
000241 

oooaos 



000007 
003534 



000001 
000040 



OOOOOl 
000012 
015567 
021714 



OOOOOl 
000013 
015605 
0217*4 



002342 



005636 



002176 
002200 
002202 
002204 



002176 
002200 
002202 
002204 



SBTTL CKRACT -- CHECK RECEIVER ACTIVE CRXACT) 

* CKRACT •• THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RXACT IN THE USYRT 

* STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE 

* STATE OF BIT IN THE WORD FOLLOWING THE CALL. 

* 

* CALLING SEQUENCE : 

* JSR R5 CKRACT 

* .WORD <6IT IS EXPECTED VALUE OF RXACT > 

CKRACT : 

07.REGNUM i SET REG NO. FOR POSSIBLE ERROR REPORT 
R5.READI {READ USYRT STATUS 



1$: 



MOV 

JSR 

USTATR 

.WORD 

BIT 

BEQ 

BITB 

BNE 





0BIT0,(R5)» 

2$ 

<►RXACT.1I 

3$ 



5 STACK "RXACT NOT SET" MSG 



GTDF 



EM71,ERR12 



{GET EXPECTED STATE OF RXACT 
;BR IF EXPECTED RXACT - 
j SEE IF RXACT - 1 
>BR IF RXACT - 1 



QUEUE "DEVICE FATAL" ERROR 10 



MOV 
MOV 
MOV 
MOV 



000040 005636 2$ 



SEC 




BR 


41 


BITB 


♦RXACT, 1 t 


BEQ 


3t 



{STACK "RXACT NOT CLEARED" MSG 
GTDF EM72,ERR12 



j SET C BIT TO FLAG ERROR 
{TAKE ERROR EXIT 
j SEE IF RXACT - 
jBR IF RXACT - 



QUEUE "DEVICE FATAL" ERROR * U 

MOV 



0T.FDF.ERRTYP 
C10.ERRNBR 
♦EM71.ERRMSG 
0ERR12.ERRBLK 



It 
4$ 



SEC 




BR 


4$ 


CLC 




RTS 


R5 



j SET C BIT TO FLAG ERROR 

;TAKE ERROR EXIT 

1 CLEAR C BIT FOR NO ERRORS 

{RETURN 



MOV 
MOV 
MOV 



OT.EDF.ERRTYP 

411.ERRNBR 

♦EM72.ERRMSC 
0ERR12.ERRBLK 



M r ; 
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,.,. CKTBMT -- CHECK TRANSMIT BUFFER * IPTY 



SEQ 0064 



2685 
2886 
2887 
2888 
2889 
2890 
2891 
2892 
2893 
2894 
289b 
2896 
2897 
2898 
2899 
2900 
2901 
2902 
2903 
2904 
2905 



005762 
005762 
005770 
005774 
005776 
006000 
006004 
006006 
006014 

006016 



006016 
006024 
006032 
006040 

2906 OO6046 

2907 006050 

2908 006052 

2909 006060 
2910 

2911 006062 

006062 
006070 
006076 
006104 

2912 006112 

2913 006114 

2914 006116 

2915 006120 
2916 

2917 
2918 
2919 



012757 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



000007 
003534 



000001 
000100 



000001 
000014 
015627 
021714 



000001 
000015 
015644 
021714 



STATE OF BIT IN THE WORD FOLLOWING THE CALL. 



002342 



.5BTTL CKTBMT -- CHECK TRANSMIT BUFFER EMPTY 

j ********** ** + ***4^***** + *4»******> ********************** ****** ***************** 

{* CKTBMT - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF TBMT IN THE USrRT 
} * STATUS RFGISTER ± AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE 

;♦ 

; + 
;* 

:* . ... ...... 

}* .UORD <BIT IS EXPECTED VALUE OF TBMT> 

; ****** ********.*********A**A***^*****> ****** *********************************** 

CKTBMT j 



CALLING 

JSR 

.UORO 



SEQUENCE 
R5. CKTBMT 
<BIT IS 



1$ 



005776 



002176 
002200 
002202 
002204 



STACK 



MOV 
JSR 

USTATR 
.WORD 
BIT 
BEQ 
BITB 
BNE 
"TBMT 
GTDF 



07.REGNUM 
R5.READI 





j SET REG NO. FOR POSSIBLE ERROR REPORT 
{READ USYRT STATUS 



*BIT0,(R5)» 
?.t 

OTBMT.l* 
3* 
NOT SET" MSG 
EM73.ERR12 



{GET EXPECTED STATE OF 
;BR IF EXPECTED TBMT ■ 
•SEE IF TBMT - 1 
{BR IF TBMT - 1 



TBMT 




000100 005776 2* 



{STACK 



SEC 




{SET C BIT TO FLAG 


BR 


4$ 


;TAKE ERROR EXIT 


BITB 


OTBMT.U 


{SEE IF TBMT « 


BEQ 


3$ 


{BR IF TBMT - 


"TBMT 


NOT CLEARED" MSG 




GTDF 


EM74,ERR12 





QUEUE "DEVICE FATAL" 



ERROR 



ERROR 
MOV 
MOV 
MOV 
MOV 



12 



4T.EDF.ERRTYP 
012.ERRNBR 
*EM73,ERRMSG 
*ERR12,ERRBLK 



002176 
002200 
002202 
002204 



3* 

4$ 



SEC 
BR 
CLC 
RTS 



4$ 
R5 



QUEUE "DEVICE FATAL 



j SET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

{CLEAR C BIT FOR NO ERRORS 

{RETURN 



ERROR * 
MOV 
MOV 
MOV 
MOV 



13 



$T.EDF,ERRTYP 
*13,ERRNBR 
*EM74,ERRMSG 
4ERR12.ERRBLK 



N5 
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CKRDA -- CHECK RECEIVE DATA AVAILABLE 



SEQ 006! 



2921 

29?:?. 

292K 
29? ; 
2925 
2926 
292/ 
2928 
2929 
2930 
2931 
2932 
2933 
2934 
2935 
2936 
2937 
2938 
2939 
2940 
2941 



006122 
006122 
006130 
006134 
006136 
006140 
006144 
006146 
006154 

006156 



006156 
006164 
006172 
006200 

2942 006206 

2943 006210 

2944 006212 

2945 006220 
2946 

2947 0O6222 

O06222 
0O6230 
OC<236 
OOo244 

2946 006252 

2949 0O6254 

2950 0O6256 

2951 006260 
2952 

2953 
2954 
2955 



01273 7 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
0127^7 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
OO0241 
000205 



00000 7 
003534 



000001 
000200 



OOOOOl 
000016 
015665 
021714 



OOOOOl 
00O017 
015701 
021714 



002342 



006136 



002176 
002200 
002202 
002204 



002176 
002200 
002202 
002204 



SBTTL 



.CKRDA --- CHECK RECEIVE DATA AVAILABLE 



j********************************************************************** 



;*■ CKRDA - THIS SUBROUTINE CHECKS FOR THE PROPER 
j* STATUS REGISTER, AND REPORTS AN ERROR IF 



STATE OF BIT IN THE WORD FOLLOWING THE 



STATE 
IT IS 
CALL. 



OF RDA IN THE US 
NOT PROPERLY SET 



* * + * + ** 

rtti 

TO THE 



CALLING 

JSR 

.WORD 



SEQUENCE 
R5, CKRDA 
<BIT IS 



EXPECTED VALUE OF HDA> 

j * ******************** **************************** *** * ***** * ****** ** * * * 

CKRDA • 

07.REGNUM j SET REG NO. FOR POSSIBLE ERROR REPORT 
R5.READI {READ USYRT STATUS 



******* 



1* 



i STACK 



MOV 
JSR 
USTATR 
.WORD 
BIT 
BEQ 
BITB 
BNE 
"RDA NOT 
GTDF 



4BIT0.CR5)* 

2$ 

ORDA.lt 

3$ 

SET" MSG 

EM75.ERR12 



{GET EXPECTED STATE 
} BR IF EXPECTED RDA 
{SEE IF RDA - 1 
{BR IF RDA - 1 



QUEUE 



OF RDA 
* 



"DEVICE FATAL" 


ERROR <> 14 




MOV <H ,LD^ .ERRTYP 




MOV iH4,ERRN6R 




MOV OEM75.ERRMSG 




MOV 0ERR12,£RRBLK 



000200 006136 2* 



{STACK 



SEC 




;SET C BIT TO FLAG 


BR 


At 


{TAKE ERROR EXIT 


BITB 


ORDA.l* 


{SEE IF RDA - 


BEQ 


3$ 


}BR IF RDA - 


*RDA NOT 


CLEARED" MSG 




GTDF 


EM76.ERR12 





ERROR 



3$: 
4$: 



SEC 
BR 
CLC 
RTS 



4$ 



R5 



<S C T 
jTAKi 
{CLE/ 
{RETURN 



QUEUE "DEVICE KATAL" 



: BIT TO FLAG ERROR 
ERROR EXIT 
I C BIT FOR NO ERRORS 



ERROR 
MOV 
MOV 
MOV 
MOV 



15 



M.EDF.ERRTYP 
*15,ERRN6R 
*EM76.ERRM5G 
$fcRR12,ERRBU< 



f.V, 
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*„. CKRSA . - CHECK RECEIVER STATUS AVAILABLE 



SEQ 0O66 



2957 










.SBTTL 


CKRSA -- CHECK RECEIVER STATUS AVAILABLE 








2958 
























2959 










I* CKRSA - THIS 


SUBROUTINE CHECKS FOR THE PROPER STATE OF RSA IN TH* 


USTRT 


2960 










1 * 


STATUS 1 


REGISTER, AND 


REPORTS AN ERROR IF IT IS NOT PROPERLY J 


SET 


TO THE 


2961 










I * 


STATE OF BIT IN THE 


WORD FOLLOWING THE CALL. 








2962 










j * 














2963 










j * 


CALLING 


SEQUENCE ! 










2964 










I ♦ 


JSR 


R5, CKRSA 










2965 
2966 

2967 










i * 


.WORD 


<BIT IS EXPECTED VALUE OF RSA> 








006262 








CKRSA: 














2965 


006262 


012737 


000007 


002342 




nov 


•7.REGNUH 


i SET REG NO. FOR POSSIBLE ERROR REPORT 




2969 


006270 


0O4537 


003534 






JSR 


R5.READI 


iREAO USYRT STATUS 








2970 


006274 


122000 








USTATR 












2971 


006276 


000000 






1*: 


.WORD 













2972 


006300 


032725 


000001 






BIT 


•BITO t (R5>* 


iGET EXPECTED STATF OF RSA 








2973 


006304 


001422 








BEQ 


2% 


j BR IF EXPECTED RSA • 








2974 


006306 


132737 


000020 


006276 




BITB 


•RSA, 11 


» SEE IF RSA - 1 








2975 


006314 


001040 








BNE 


3* 


iBR IF RSA ■ 1 








2976 










l STACK 


"USA NOT 


SET" HSG 










2977 


006316 










GTOf 


EM77.ERR12' 


l QUEUE "DEVICE FATAL" 


ERROR • 


16 






006316 


012737 


000001 


002176 










NOV 




♦T.EDF.ERRTYP 




006324 


012737 


000020 


002200 










MOV 




♦16.ERRNBR 




006332 


012737 


015721 


002202 










MOV 




♦EM7 7.ERRWSG 




006340 


012737 


021714 


002204 










HOV 




#ERR12,ERR6LK 


2978 


006346 


000261 








SEC 




i SET C BIT TO FLAG ERROR 








2979 


006350 


000423 








BR 


4$ 


iTAKE ERROR EXIT 








2960 


006352 


132737 


000020 


006276 


21: 


BITB 


♦RSA.H 


iSEE IF RSA ■ 








2981 


006360 


001416 








BEQ 


31 


iBR IF RSA » 








2962 










1 STACK 


"RSA NOT 


CLEARED" PSG 










2983 


006362 










GTDF 


EM78.ERR12 


1 QUEUE "DEVICE FATAL" 


ERROR • 


17 






006362 


012737 


000001 


002176 










MOV 




•T.EDF.ERRTYP 




006370 


012737 


000021 


002200 










HOV 




•17.ERRNBR 




006376 


012737 


015735 


002202 










HOV 




♦Eh78,ERRMSG 




006404 


012737 


0217X4 


002204 










MOV 




♦ERRX2.ERR8LK 


2984 


006412 


000261 








SEC 




iSET C BIT TO FLAG ERROR 








2965 


006414 


000401 








BR 


4$ 


j TAKE ERROR EXIT 








2966 


006416 


000241 






31: 


CLC 




iCLEAR C BIT FOR NO ERRORS 








2987 
2968 
2989 


006420 


QOO205 






4*4 


RTS 


R5 


jRETURN 































a 



_ r ) 
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>„. CKROR -- CHcCK RECEIVER OVERRUN 



SEQ 0067 



2991 
2992 
2993 
2994 
2995 
2996 
2997 
2998 
2999 
3000 
3001 
3002 
3003 
3004 
3005 
3006 
3007 
300^ 
3009 
3010 
3011 



006422 
006422 
006430 
006434 
006436 
006440 
006444 
00644C 
006454 

006456 



006456 
006464 
006472 
006500 

3012 006506 

3013 006510 

3014 006512 

3015 006520 
3016 

3017 006522 

006522 
006530 
006536 
006544 

3016 006552 

3019 006554 

3020 006556 

3021 006560 
3022 

3023 
3024 



012737 
004537 
120401 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



.SBTTL CKROR -- CHCCK RECEIVER OVERRUN 



♦ CKROR - THIS SUBROUTINE CHECKS FOR THE OCCURANCE Of RECEIVER OVERRUN IN THE 

♦ USYRT RECEIVER STATUS REGIST£R (RDSRH), ANO REPORTS AN ERROR IF IT IS 

♦ NOT PROPERLY SET TO THE STATE OF BIT IN THE WORD FOLLOWING THE CALL. 



CALLING SEQUENCE : 

JSR R5. CKROR 

.WORD <BIT IS EXPECTED VALUE OF ROR> 



* + * 



000001 002342 

003534 



000001 

O0OO10 006436 



000001 002176 

000022 002200 

016300 002202 

021714 002204 



000010 0O6436 



000001 002176 

000023 002200 

016331 002202 

021714 002204 



CKROR { 



1$ 



i STACK 



MOV 
JSR 
ROSRH 
,WORD 
BIT 
BEQ 
BlfB 
BNE 
"RECEIVER 



♦l.REGNUM 
R5.READI 



*eiT0.(R5)t 
2$ 

♦ROR.lt 
31 

OVRN NOT SET 



GTDF EM90.ERR12 



SEC 




BR 


4$ 


2$: BITB 


♦ROR.lt 


BEQ 


3t 


j STACK "ROR NOT 


CLEAREO" MSG 


GTDF 


EM91,ERR12 



31: 

4ti 



SEC 




BR 


41 


CLC 




RTS 


R5 



iSET REG NO. FOR POSSIBLE ERROR REPOOT 
iREAO RECEIVER STATUS 



jGET EXPECTED STATE OF ROR 
jBR IF EXPECTED ROR - 
i SEE IF ROR ■ 1 
tBR IF ROR « 1 
MSG 

I QUEUE "DEVICE FATAL" ERROR * 18 

MOV 
MOV 
MOV 
MOV 

l SET C BIT TO FLAG ERROR 

,TAKE ERROR EXIT 

,SEE IF ROR • 

iBR IF ROR - 



QUEUE 



I SET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

» CLEAR C BXT FOR NO ERRORS 

t RE TURN 



♦ T.EDF.ERRTYP 

♦ lfl.ERRNBR 
♦EM90.ERRMSG 
0ERR12.ERRBLK 



DEVICE FATAL" 


ERROR ♦ 19 




MOV #T.EDF t ERRTYP 




MOV ♦19.ERRNBR 




MOV ♦EM91.ERRMSG 




MOV *ERR12.ERRSLK 



D(j 
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„., CKSEOM -- CHECK RSOM, REOM 



SEQ 0068 



302t> 
3027 
3028 
i02? 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
5044 
3045 
3046 
3047 
3048 
3049 



5050 
3051 
3052 
3053 
3054 
3055 



3056 
3057 
3056 
3059 
3060 
3061 
3062 
3063 



006562 
006562 
006570 
006574 
006576 
006600 
006604 
006606 
006614 

006616 

006616 
006624 
0O6632 
006640 
006646 
006650 
006652 
0O6660 

006662 

006662 
006670 
006676 
006704 
006712 
006714 
006716 
006724 
006726 
006734 

006736 



0O6736 
006 744 
006752 
006760 

3064 006766 

3065 006770 

3066 006772 

3067 007000 



012737 
004537 
120401 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 
000473 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000451 
032765 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 

000423 

132737 

001416 



000007 002342 
003534 



000001 

000001 006576 



000001 
000024 
0145O1 
021714 



002176 
002200 
002202 
002204 



.SBTTL CKSEOM -- CHECK RSOM, REOM 

♦a************************************************************************** 

CKSEOM - THIS SUBROUTINE CHECKS FOR THE PROPER STATES OF RSOM, REOM IN THE 
USYRT RECEIVER STATUS REG (RDSRH) AND REPORTS AN FRPOR IF THEY ARE NOT 
PROPERLY SET TO THE STATES OF BITS 0,1 IN THE WORD FOLLOWING THE CALL. 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKEO, ANO THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE, 

CALLING SEQUENCE j 
JSR R5 CKSEOM 
<BIT IS EXPECTED VALUE OF RSOM, BIT 1 IS VALUE OF REOM> 

************************* ******** ******************** **** ****** ************* 

CKSEOM: 

♦ 7,REGNLTI i SET REG NO. FOR POSSIBLE ERROR REPORT 
R5.READI i READ USYRT RECEIVER STATUS 



It 



j STACK 



2t: 

j STACK 



000001 006576 



000001 002176 

000025 002200 

014460 002202 

021714 002204 



000002 177776 
000002 006576 



000001 002176 

000026 002200 

014537 002202 

021714 002204 



000002 006576 4*; 



3* 



{STACK 



MOV 
JSR 
RDSRH 
.WORD 
BIT 
BEQ 
BITB 
BNE 
"RSOM NOT 



♦BIT0.CR5)* 
21 

♦RSOM, II 
3* 

SET" MSG 



»GET EXPECTED STATE OF 
iBR IF EXPECTED RSOM - 
»5EE IF RSOM - 1 
»BR IF RSOM • 1 



RSOM 




GTDF EM29,ERR12 



SEC 
BR 
BITB 
BEQ 



61 

•RSOH.lt 
3t 



QUEUE "DEVICE FATAL" 



j SET C BIT TO FLAG ERROR 
I TAKE ERROR EXIT 



ERROR * 20 




MOV 


•T.EDF.ERRTYP 


MOV 


•20 , ERRNBR 


MOV 


♦EM29.ERRMSG 


MOV 


♦ERR12.ERRBLK 



"RSOM NOT CLEARED" MSG 



GTDF 



EM28.ERR12 



i SEE IF RSOM 
»BR IF RSOM 



QUEUE 



SEC 
BR 
BIT 
BEQ 
BITB 
BNE 
"REOM NOT 
GTDF 







"DEVICE FATAL" ERROR ♦ 

MOV 
MOV 
MOV 
MOV 



21 



61 

♦BIT1.-2CR5) 
4$ 

•REOM.lt 
5t 

SET" MSG 
EM31.ERR12 



iSET C BIT TO FLAG ERROR 

I TAKE ERROR EXIT 

iGET EXPECTED STATE OF REOM 

i BR IF EXPECTED REOM - 

I SEE IF REOM - 1 

tBR IF REOM - 1 



♦T.EDF.CRRTYP 
♦21. ERRNBR 
♦EM26.ERRMSG 
♦ERR12.ERRBLK 







j QUEUE "DEVICE FATAl 


." ERROR ♦ 22 

MOV ♦T.EDF.ERRTYP 
MOV ^22. ERRNBR 
MOV ♦EM31.ERRMSG 

MOV ♦eRRia.ERRBLK 


SEC 




, i SET C BIT TO FLAG ERROR 




BR 


6$ 


iTAKE ERROR EXIT 




BITB 


♦REOM,!* 


tSEE IF REOM « 




BEQ 


M 


iBR If REOM « 





Y.h 



CNOMDAO DMV11 LINE UNIT DIAG2 MACRO M1200 22-FFB-84 15: 39 PAGE 45 i 
. % .,CKSEOM -- CHECK RSOM, REOM 



3068 

3069 007002 

007002 012737 000001 002176 

007010 012737 000027 002200 

007016 012737 014516 002202 

007024 012737 021714 002204 

3070 007032 0OO261 

3071 007034 000401 

3072 007036 000241 

3073 007040 000205 
3074 

3075 



5 STACK "REOM NOT CLEARED" MSG 
GTDF EM30.ERR12 





SEC 






BR 


6% 


5$: 


CLC 




6$; 


RTS 


R5 



SEQ 0069 



QUEUE "DEVICE FATAL" ERROR * 23 





MOV 


OT.EDF.ERRTrP 




MOV 


*23,ERRN6R 




MOV 


0EM30.ERRMSG 




MOV 


*ERR12,ERRBLK 


;SF.T C BIT TO FLAG ERROR 






{TAKE ERROR EXIT 






j CLEAR C BIT FOR NO ERRORS 






; RETURN 







F6 
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CHKTSO -- CHECK TRANSMIT SERIAL OUT BIT 



SEQ 0070 



3077 
3076 
3079 
3080 
3081 
3082 
3083 
3084 
3085 
3086 
3087 
3088 
3089 
3090 
3091 
3092 
3093 
3094 
3095 
3096 
3097 



3098 
3099 
3100 
3101 
3102 
3103 
3104 



007042 
007042 
007050 
007054 
007056 
007060 
007064 
007066 
0O7074 

007076 

007076 
007104 
007112 
0O7120 
0O7126 
007130 

0O7132 
0O7140 

0O7142 



0O7142 
007150 
007156 
007164 

3105 007172 

3106 007174 

3107 0O7176 

3108 0O720O 
3109 



012737 
004537 
122OO0 
OOOOOO 
032725 
001422 
132737 
001040 



012737 
012737 
012757 
012737 
000261 
0OO423 

132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



000007 002342 
003534 



OOOOOl 

000010 007056 



OOOOOl 
000030 
016422 
021714 



002176 
002200 
002202 
002204 



.SBTTL CHKTSO - CHECK TRANSMIT SERIAL aUT BIT 

j***************************************************************************** 

j* CHKTSO - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF TSO IN THE USYRT 

;* STATUS REGISTER, AND SETS THE "C" BIT IF IT IS NOT SET TO THE STATE 

j* OF BIT IN THE WORD FOLLOWING THE CALL. 

;♦ 

j* CALLING SEQUENCE : 

;* JSR R5.CHKTS0 

i* .WORD <BIT IS EXPECTED VALUE OF TS0> 

I******************************************************************** 4 ******** 

CHKTSO: 

»SET REG NO. TOR POSSIBLE ERROR REPORT 
jREAD USYRT STATUS 



1$ 



MOV 


*7,REGNUtf 


JSR 


R5.READI 


USTATR 




.WORD 





BIT 


*6IT0,(R5)+ 


BEQ 


21 


BITB 


♦TSO.ll 


BNE 


3$ 


!♦*♦ STACK "TSO NOT 


GTOF 


EM100.ERR12 



iGET EXPECTED STATE 
;BR IF EXPECTED TSO 
j SEE IF TSO ■ 1 
jBR IF TSO - 1 
SET" ERROR +** 



OF TSO 
- 



SEC 
BR 



At 



000010 007056 2$ 



OOOOOl 002176 

000031 002200 

016442 002202 

021714 002204 



BITB OTSO.l* 
BEQ 3i 
!♦** STACK "TSO 



NOT 



GTDF 



EM101,ERR12 





SEC 




BR 


31: 


CLC 


4$: 


RTS 



4* 

R5 



QUEUE "fvVICE FATAL" 



»SET C BIT TO FLAG ERROR 
j TAKE ERROR EXIT 

t SEE IF TSO - 
jBR IF TSO - 
CLEARED" ERROR *** 

: QUEUE "DEVICE FATAL" 



j SET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

j CLEAR C BIT FOR NO ERRORS 

jRETURN 



ERROR * 

MOV 
MOV 
MOV 
MOV 



24 



*T.EDF,ERflTYP 
*24 . ERRNBR 
*EM100,ERRMSG 
*ERR12.ERRBLK 



ERROR * 

MOV 
MOV 
MOV 
MOV 



25 



♦T.EDF.ERRTYP 
025.ERRNBR 
♦EM101.ERRHSG 
*ERR12.ERRBLK 



G6 



CNDMDAO DMV'll LINE UNIT DIAG2 MACRO M1200 22-FEB-84 15s 39 PAGE 47 
SERIAL -- READ/CHECK TX CHARACTER VIA TSO BIT 



SEQ 0071 



3111 
311c? 
3113 
3114 
3115 
3116 
3117 
3118 
3119 
3120 
3121 
3122 
3123 
3124 
3125 
3126 
3127 
3126 
3129 
3130 
3131 
3132 
3133 
3134 
3135 
3136 
3137 
313« 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 



3149 

3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3158 



007202 
007202 
007204 
007206 

007210 
007212 

007214 

007216 
007222 

007224 
007230 
007232 
007234 
007236 

007240 
007242 
007244 

007246 
007252 

007256 

007256 
007264 
007272 
007300 
007506 
007310 

007312 
007314 
007316 
007320 
007322 



010146 
010246 
010346 

005001 
012502 

006301 
004537 
000001 

004537 
000001 
103401 
005201 
077212 

012503 
020103 
001422 

010337 
010137 



012737 
012737 
012737 
012737 
000261 
00O401 

000241 
012603 
012602 
012601 
000205 



.SBTTL SERIAL -- READ/CHECK TX CHARACTER VIA TSO BIT 

;* SERIAL - THIS SUBROUTINE SERIALLY READS/CLOCKS/CHECKS A CHARACTER FROM 



THE TRANSMIT SERIAL OUT (TSO) BIT OF THE USYRT STATUS REGISTER, 
AND STACKS MESSAGE/SETS "C" BIT If AN INCORRECT CHARACTER IS REAO. 
NOTE: "EXPECTED VALUE" ARGUMENT IS ALWAYS READ RIGHT-TO-LEFT. 



CALLING SEQUENCE : 

JSR R5, SERIAL 

.WORD <♦ Of* BITS TO BE READ> 

.WORD <EXPECTED VALUE Of SERIAL BIT STREAM> 

SERIAL * 

MOV Rl, -CSP) iSAVE Rl 

MOV R2.-CSP) ;SAVE R2 (TICKS) 

MOV R3,-(SP) iSAVE R3 (EXPECTED UORD) 



011540 
007042 



1$: 



2$: 



CLR 
MOV 

ASL 
JSR 

1 

JSR 
1 

BCS 
INC 

soe 

MOV 
CMP 
BEQ 



Rl 

(R5)*,R2 

Rl 
R5,STEPLU 



R5,CHKTS0 

2$ 
Rl 

R2,lf 

(R5)*.R3 

R1.R3 

3* 



I CLEAR ASSEMBLED _ WORD 
j GET # OF TICKS 

i SHIFT ASSEMBLED_WORD 
; CLOCK USYRT ONCE 



s CHECK FOR TSO-1 

;BR IF TSO-0 

j TSO-1: SET LSB OF ASSEMBLED WORD 

:LOOP UNTIL NO MORE TICKS 

»GET EXPECTED .WORD 

I COMPARE EXPECTED.. ANO ASSEMBLED WORD 

j BR IF CORRECT VALUE READ 



0O2330 
002332 



000001 0O2176 

000032 002200 

016735 002202 

022030 002204 



MOV R3.G0ATA , EXPECTED.WORD 
MOV Rl.BDATA , ASSEMBLED, WORD 
*♦♦* STACK "TRANSMISSION ERROR" MSG *** 
GTDF EM106.ERR13 

j QUEUE 



■ > 



GOAT A 
• BDATA 



3«: 



4$: 



SEC 






BR 


.♦4 




CLC 






MOV 


CSP)* 


,R3 


MOV 


(SP)» 


,R2 


MOV 


(SP)* 


• Rl 


RTS 


R5 





j SET C BIT TO 



"DEVICE FATAL" ERROR P 

MOV 
MOV 
MOV 
MOV 

FLAG ERROR 



26 



ST.EDF.ERRTYP 
*26.ERPNBR 
*EM106,ERRMSG 
*ERR13,ERRBLK 



I TAKE ERROR EXIT 

j CLEAR C BIT FOR NQ ERRORS 
, RESTORE REGISTERS 



j RETURN 
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INITRN •- INIT TRANSMISSION OF A MESSAGE 



; 



SEQ 00 72 



3160 








5161 








3162 








3163 








3164 








3165 








3166 








3167 








3168 








3169 








3170 








3171 








3172 








3173 








3174 








3175 








3176 








3177 


007324 






3178 


007324 


010146 




3179 


007326 


004537 


003660 


3180 


007332 


120000 




3181 


007334 


000031 




3182 


007336 


004537 


003660 


3183 


007342 


120000 




3184 


007344 


000030 




3185 


007346 


112537 


007360 


3186 


007352 


004537 


003660 


3187 


007356 


120404 




318£ 


007360 


000000 




3189 


007362 


112537 


007374 


3190 


007366 


004537 


003660 


3191 


007372 


120405 




3192 


007374 


000000 




3193 


007376 


112537 


007422 


3194 


007402 


005037 


002406 


3195 


007406 


113737 


007422 002406 


3196 


007414 


004537 


003660 


3197 


007420 


120407 




3198 


007422 


000000 




3199 


007424 


004537 


003660 


3200 


007430 


120013 




3201 


007432 


000200 




3202 


007434 


004537 


003660 


3203 


007440 


120006 




3204 


007442 


000 3O0 




3205 


007444 


004537 


003660 


3206 


007450 


120007 




3207 


007452 


OOOOOO 




3208 


0O7454 


004537 


005356 


3209 


007460 


000110 




3210 


007462 


103454 




3211 








3212 


007464 


013737 


007620 007504 


3213 


007472 


142537 


007504 


3214 








3215 


007476 


004537 


003660 


3216 


007502 


120000 





.SBTTL ....INITRN -- INIT TRANSMISSION OF A MESSAGE 

• ************************************************************************ ***** 

j* INITRN - THIS SUBROUTINE INITIATES TRANSMISSION OF A MESSAGE, BY LOADING 
;* 

; * 

;* 
;* 
{* 

;* 
;* 

; + 
{♦ 
;* 
j* 
:* 



THE USYRT PCSARL, H ANO THE PCR UITH THE DATA PASSED IN THE 2 WORDS 
FOLLOWING THE CALL i LOADING ANO CLOCKING 1 SOM UNTIL THE FIRST 
SYNCH OR FLAG HAS BEEN SERIALIZED IN THE USYRT, THE PROGRAM MONITORS 
ALL THE FLAGS IN THE USYRT STATUS REGISTER THROUGHOUT THE PROCESS. 
IF THE SUBROUTINE DETECTS AN ERROR. THE ERROR INFORMATION IS STACKED 
AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE DISCRETION 
OF THE CALLING ROUTINE OR SUBROUTINE. 



CALLING SEQUENCE : 
JSR R5. INITRN 

.WORD <VALUE TO LOAD INTO USYRT PCSARL, H> 
.WORD <VALUE TO LOAD INTO USYRT PCR CPASSED IN LO BYTE)> 
;* <SPECIAL VIAORB MASKING VALUE CPASSED IN HI BYTE)> 

********* ********************** ****** * * * **** **** *** ** * **** ***** * ** ** *** 

INITRN: 

j SAVE Rl 

{RESET THE USYRT 



{CLEAR USYRT RESET BIT 



ft*** 



1$ 



2* 



3t 



MOV 


Rl.-CSP) 


JSR 


R5.WRITEI 


VIAORB 




RTSNDJDTR! PRESET 


JSR 


R5.WRITEI 


VIAORB 




RTSNO'DTR 


MOVB 


CR5)*,1I 


JSR 


R5.WRITEI 


PCSARL 




.WORD 





MOVB 


(R5)*.2$ 


JSR 


R5.WRITEI 


PCSARH 




.WORD 





MOVB 


(R5)»,3I 


CLR 


SAVLEN 


MOVB 


3I.SAVLEN 


JSR 


R5.WRITEI 


PCR 




.WORD 





JSR 


R5.WRITEI 


VIAACR 




200 




JSR 


R5.WRITEI 


VIATIC 




300 




JSR 


R5.WRITEI 


VIAT1D 




000 




JSR 


R5.CKUSTS 


110 




BCS 


7$ 



MOV 20$. 13$ 

BICB CR5)*,13I 

JSR R5*WRITEI 
VIAORB 



{GET VALUE TO LOAD INTO USYRT PCSARL 
;LOAD USYRT PCSARL 



{GET VALUE TO LOAD INTO PCSARH 
{LOAD USYRT PCSARH 



{GET VALUE TO LOAD INTO PCR 

;SAVE CHAR LENGTH BITS 
{LOAD USYRT PCR 



{SET ACR FOR Tl ONE -SHOT MODE 



{LOAD VIA T1L-L 



{LOAD VIA T1L-H 



jCHK USYRT STATUS FOR INIT'D STATE 

t TBMT - 1. TSO - 1 

{IF ERROR, EXIT SUBROUTINE 

i* SET UP DEFAULT VIAORB PARAMETERS 
{* CLEAR ANY SPECIFIED VIAORB BITS. 

{SET UP USYRT 



Tf 



> 
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3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 



007504 000142 



007506 
007512 
007514 
007516 
007522 
007524 
007526 
007532 
007534 
007536 
007540 
007544 
007546 
007552 
007554 
007556 
007564 
007566 
007570 
007574 
007576 
007602 
007604 
007606 
007612 
007614 
007616 



004537 
120403 
000001 
004537 
120402 
0OO226 
004537 
000000 
103427 
005001 
004537 
OOOOOl 
004537 
122OO0 
OOCOOO 
132737 
001010 
005201 
020127 
002761 
004537 
OOOOOl 
103403 
004537 

OOOOOl 
012601 
000205 



13$ 



003660 



003660 



005762 



011540 
003534 



C00100 007554 



4$: 



5$: 



000O03 
005762 



005462 



007620 000142 



6*j 

7$: 



20* 



TXEN!RXEN!TTLOOP 



JSR 


R5.URITEI 


TDSRH 




TSOM 




JSR 


R5.WRITEI 


TOSRl. 




SYNCH 




JSR 


R5.CKTBMT 







6CS 


1% 


CLR 


Rl 


JSR 


R5,STEPLU 


1 




JSR 


R5.READI 


USTATR 




.WORD 





BITB 


*TBMT,5* 


BNE 


6* 


INC 


Rl 


CMP 


Rl,#3 


BLT 


4* 


JSR 


R5,CKTBMT 


1 




BCS 


7$ 


JSR 


R5,CKTACT 


1 




MOV 


(SP)*,R1 


RTS 


R5 



SEQ 0073 



TXENJRXEN'TTLOOP 



i* THIS VALUE MIGHT BE MODIFIED ABOVE 
I SET TSOM IN USYRT 

lLOAD SYNCH CHAR INTO TX BUT 



;CHK FOR TBMT • 

;IF ERROR, EXIT SUBROUTINE 
j INIT CYCLE COUNTER 
j CLOCK LU FOR 1 CYCLE 

tREAD USYRT STATUS REG 



j SEE IF TBMT IS SET YET 

iBR IF YES 

jINCR CYCLE COUNTER 

i SEE IF 3 CYCLES DONE YET 

tBR IF LESS THAN 3 CYCLES 

j GO STACK "TBMT NOT SET'' MSG 

j IF ERROR, EXIT SUBROUTINE 
}CHK FOR TXACT - 1 

•RESTORE Rl 

';RETURN (IF C - 1, WE HAD AN ERROR) 

{DEFAULT VALUE FOR VIAORB: ENABLE 
;TX ANO RX ON USYRT, ASSERT RTS. DTR 
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TXCHAR -- TRANSMIT A CHARACTER 



SEQ 0074 



3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

3294 

3295 

3296 

3297 

3298 

3299 

3300 

3301 

.5302 

5501 

3304 



007622 
007622 
007624 
007626 
007632 
007636 
007640 
007642 
007644 
007646 
007650 
007652 
007656 
007660 
007662 
007664 

007666 
007672 

007674 
007700 
007702 
007704 
007710 
007712 
007714 
007716 
00772? 
007724 
007726 
007730 
007732 



0.10146 
010246 
012537 
004537 
120402 
000000 
0O5O01 
005002 
112502 
001425 
004537 
000001 
103421 
020102 
001414 

141527 
0010O4 

0O4537 
OOOOOO 
1CB410 
0O4537 
0O0O01 
005201 
OO0756 
0O4537 
000001 
012602 
012601 
005205 
000205 



r BTTL TXCHAR -- TRANSMIT A CHARACTER 

*****+*********+*************************************************«*«******** 

TXCHAR - THIS SUBROUTINE INITIATES TRANSMISSION Of" A CHAR BY LOADING 
THE USYRT TDSRL WITH THE DATA PASSED IN THE LO BYTE Of THE WORD 
FOLLOWING THE CALL, AND CLOCKS THE LINE UNIT WITH THE NUMBER Of CYCLES 
PASSED IN THE SECOND WORO FOLLOWING THE CALL, THE PROGRAM CONTINUALLY 
MONITORS TBMT ANO TXACT THROUGHOUT THE PROCESS, 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



007640 
003660 



005462 



000200 
005762 
011540 

005762 



CALLING 
JSR 
.WORD 
.UORD 



************* 
TXCHAR: 

MOV 

MOV 

MOV 

JSR 

TDSRL 
1*1 .WORD 

CLR 

CLR 

MOVB 

BEQ 
3*: JSR 

1 

BCS 

CMP 

BEQ 

BITB 
BNE 

JSR 



BCS 
7»: JSR 

1 

INC 

BR 
5$: JSR 

1 
6$: MOV 

MOV 

INC 

RTS 



SEQUENCE : 
R5, TXCHAR 

<DATA FOR TDSRL IN LO BYTE> 
<NUMBER OF CYCLES TO CLOCK C IN LO BYTE)> 

<SWITCH TO DISABLE INITIAL TBMT-0 CHECK (MSB IN HI BUE)> 
************* *** * ******************** *******************a****** 



Rl.-CSP) 
R2.-CSP) 
CR5)*.l* 
R5.WRITEI 



♦ R2 





Rl 

R2 

(R5) 

61 

R5.CKTACT 

6$ 

R1.R2 
5* 

(R5),mCTBMT 
71 

R5.CKTBMT 

6* 

R5,STEPLU 

Rl 
3$ 

R5.CKTBMT 

(SP)*,R2 
<SP5*.fU 
R5 

R5 



j SAVE Rl 

I SAVE R2 

;GET DATA FOR TOSRL 

jLOAD DATA INTO TDSRL 



iINIT CYCLE COUNT ANO CLEAR C BIT 
jCLEAR REQ'D CYCLE COUNT 
jGET DESIRED NO. OF CYCLES 
j BR IF NO CLOCKING DONE 
{CHECK TXACT - 1 

}BR TO EXIT IF ERROR 

;SEE IF REQUIRED CYCLES DONE YET 

}BR IF YES 

»* CHECK FOR "TBMT-0 CHECK" DISABLE 
{♦ BR IF MSB IS NOT SET 

j CHECK FOR TBMT - 

;BR TO EXIT IF ERROR 

j CLOCK LU FOR 1 CYCLE 

jINCR CYCLE COUNT 
jKEEP CLOCKING 
jCHK TBMT - 1 

jRESTORE R2 

jRESTORE Rl 

» ADJUST R5 FOR SANE RETURN 

jRETURN (WITH C BIT - 1 IF ERROR) 



Wf 



\) 
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TXCTRL -- CONTROL MESSAGE TRANSMISSION (TDSRH) 



SEQ 0075 



3306 
330 7 
3308 
3309 
3310 
3311 
3312 
3313 
3314 
3315 
3316 
3317 
3318 
3319 
3320 
3321 
3322 
3323 
3324 
3325 
3326 
3327 
3328 
3329 
3330 
3331 
3332 
3333 
3334 
3335 
3336 
3337 
3358 
3339 
3340 
3341 
3342 
3343 
3344 
3345 
3346 
3347 
3348 
3349 
3350 



007734 
007734 
007736 
007740 
007744 
007750 
007752 
007754 
007756 
007760 
007762 
007766 
007770 
007772 
007774 
0O7776 
010002 
010004 
01OO06 
010012 
010014 
010016 
010020 
010024 
010026 
010030 
010032 



010146 
010246 
012537 
004537 
120403 
OOOOOO 
005001 
012502 
001422 
0O4537 
0O00O1 
103416 
020102 
001411 
0O4537 
OOOOOO 
103410 
004537 
OOOOOl 
005201 
000761 
004537 
OOOOOl 
012602 
012601 
000205 



.SBTTL TXCfRL - •• CONTROL MESSAGE TRANSMISSION (TDSRH) 

t**************************.***,************************^*********************** 

i* TXCTRL - THIS SUBROUTINE ALLOWS CONTROL OF MESSAGE TRANSMISSION Br LOADING 
THE USYRT TDSRH WITH THE DATA PASSED IN THE LO BYTE OF THE WORD 
FOLLOWING THE CALL. ANO CLOCKS THE LINE UNIT WITH THE NLtlBER OF CYCLES 
PASSED IN THE SECOND WORD FOLLOWING THE CALL. THE PROGRAM CONTINUALLY 
MONITORS TBMT ANO TXACT THROUGHOUT THL PROCESS. 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



j* 
:* 

:* 
J* 
J* 
}* 

;♦ 
j* 

i + 

: * 



007752 
003660 



CALLING SEQUENCE ; 
JSR R5 TXCTRL 

.WORD <DATA FOR TDSRH IN LO BYTE> 
.WORD < NUMBER OF CYCLES TO CLOCK > 
. a*************.*************.***.********* :.**** ***************** ****** ********** 

TXCTRL: 

j SAVE Rl 

. SAVE R2 

jGET DATA FOR TDSRH 

jLOAD DATA INTO TDSRH 



005462 

005762 
011540 

005762 



2$ 



3* 



6*: 



MOV 


R1.-C5P) 


MOV 


R2.-CSP) 


MOV 


(R5)*,2$ 


JSR 


R5,WRITEI 


TDSRH 




.WORD 





CLR 


Rl 


MOV 


(R5)*,R2 


BEQ 


61 


JSR 

1 

BCS 


R5,CKTACT 


6* 


CMP 


R1.R2 


BEQ 


5$ 


JSR 


R5.CKTBMT 







BCS 


6$ 


JSR 

1 

INC 


R5.STEPLU 


Rl 


BR 


3$ 


JSR 

1 

MOV 


R5.CKTBM1 


(SP)*.R2 


MOV 


(SP)t.Rl 


RTS 


R5 



jINIT CYCLE COUNT ANO CLEAR C BIT 
jGET DESIRED NO. OF CYCLES 
i BR IF NO CLOCKING DONE 
tCHECK TXACT - 1 

;BR TO EXIT IF ERROR 

j SEE IF REQUIRED CYCLES DONE YET 

j BR IF YES 

j CHECK FOR TBMT - 

jBR TO EXIT IF ERROR 
j CLOCK LU FOR 1 CYCLE 



iINCR CYCLE COUNT 
{KEEP CLOCKING 
,CHK TBMT - 1 

jRESTORE R2 

iRESTORE Rl 

jRETURN (WITH C BIT - 



1 IF ERROR) 



CNDMDAO DMVU LINE UNIT DIAG2 MACRO M1200 ?? FEB-84 15:39 PAGE 51 
, ...RXCHAR -- RECEIVE A CHARACTER 



SEQ 0076 



3352 
3353 
3354 
3355 
3356 
3357 
3358 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 
3367 
3368 
3369 
3370 
3371 
3372 
3373 
3374 
3375 
3376 
3377 
3378 
3379 
3380 
3381 
3382 
3383 
3384 
3385 
3386 
3387 
3388 
3389 
3390 
3391 
3392 
3393 
3394 
3395 



3396 

3397 
3398 
3399 
3400 
3401 
340? 
3403 



010034 
010034 
010036 
01OO40 
010044 
010046 
010050 
010054 
010056 
010060 
010062 
010066 
010074 
010076 
010104 
010110 
010114 
010116 
010122 
010124 
010126 
010134 
010136 

010144 

010144 
010152 
010160 
010166 
010174 
010200 
010204 
010210 
010214 
010220 

010226 



010146 
010246 
0O4537 
120401 
OOOOOO 
004537 
120400 
OOOOOO 
111501 
042701 
023727 
0O1005 
142737 
142701 
123701 
001462 
004537 
122000 
OOOOOO 
132737 
001421 
012737 



012737 
012737 
012737 
012737 
0OC137 
005037 
0O5037 
110137 
005037 
113737 



003534 



003534 



177400 
002406 

0O0200 
000200 
010056 

0O3534 



0OO002 
000007 



000001 
000033 
015330 
021714 
011274 
0O2342 
002330 
002330 
002332 
010056 



. SBTTL RXCHAR -- RECEIVE A CHARACTER 

+ + + **.+.4. + + + + + + + * + + t + ±*+ + + + + + * + + 4, + 4 l + + + + + + 4.4 + +, + + ++, + *$, + + + * l * + *+*ii,*** + i + * + t*tt + l m 

* RXCHAR - THIS SUBROUTINE READS THE USYRT RDSR AND CHECKS THE CONTENTS 

* AGAINST THE DATA PASSED IN THE WORD FOLLOWING THE CALL. 

* IF BITO - IN THE SECOND WORD FOLLOWING THE CALL, THE RERR BIT IS 
NOT CHECKED AGAINST THE EXPECTED VALUE. THEN, IT CLOCKS 
THE LINE UNIT FOR THE NO. OF CYCLES PASSED IN THE THIRD UORD 
FOLLOWING THE CALL. THE PROGRAM CONTINUALLY MONITORS RDA AND RXACT. 
IF THE SUBROUTINE DETECTS AN ERROR. THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



THE 



CALLING 

JSR 

.WORD 

.WORD 

.WORD 



;equence 



R5, RXCHAR 

<EXPECTED RDSRL IN LO BYTE, RDSRH IN HI BYTE> 

<-0 FOR NO RERR CHK, -1 FOR RERR CHK> 

<NUMBER OF CYCLES TO CLOCK C IN LO BYTE)> 

<SPECIAL DISABLE SWITCHES; NOCRDA,NFCRDA,NCRACT(IN HI BrTE)> 

RXCHAR: 

Rl.-CSP) i SAVE Rl 

R2.-CSP) j SAVE R2 

R5,READI {READ RDSRH 



25 



? $ 



MOV 

MOV 

JSR 

RDSRH 

.WORD 



00034 7 
010056 



3$ 



4$ 



010124 
002342 



002176 
002200 
0O2?02 
002204 



RDSRL 
.WORD 
MOVB 
BIC 
CMP 
BNE 
BICB 
BICB 
CMPB 
BEQ 
JSR 

USTATR 
.WORD 
BITB 
BEQ 
MOV 





R5.READI 



(R5).R1 
#177400, Rl 



j READ RDSRL 



jGET EXPECTED RDSRL 
,MASK OFF UNUSED BITS 



SAVLEN,#TXDL'RXDL , SEE IF N8IT CHARS BEING USED 



3$ 

♦BIT7.H 

*BIT7,R1 
1*,R1 
61 
R5.READI 



*TXU,4$ 

5* 

*7,REGNUM 



j STACK "TX UNOERRUN" ERROR 



GTDF 



EM54,ERR12 



002332 



JMP 201 

5$: CLR REGNUM 

CLR GDATA 

MOVB Rl, GDATA 

CLR BDATA 

MOVB 1$, BDATA 
j STACK "RCV'D DATA MISCOMPARE" ERROR 

GTDF EM34,ERR10 



jBR IF NOT 7 -BIT CHARS 

j CLEAR 8TH BIT FOR COMPARE 

j COMPARE RCV'D CHAR TO EXPECTED 

jBR IF MATCH 

jREAD USYRT STATUS REG 



j SEE IF TX UNOERRUN OCCURRED 

j BR IF NOT 

jSET USYRT REG NO, FOR STATUS REG 



QUEUE "DEVICE FATAL" ERROR 27 

MOV 
MOV 

MOV 
MOV 



jTAKE ERROR EXIT 

jSET USYRT REG NO. FOR RDSRL 

{SET EXPECTED DATA 

jSET ACTUAL DATA 



OT.EDF.ERRTYP 
#2 7,ENRNBR 
*EHS4 , ERRMSG 
4ERR12.ERRBLK 



CNDMOAO DMV11 LINE UNIT DIAG2 MACRO M1200 
RXCHAR -- RECEIVE A CHARACTER 



22 -FEB -84 15:39 PAGE. 51-1 



SEQ 0077 



QUEUE: "DEVICE FATAL 



28 



010226 


012737 


000001 


002176 












MOV 


OT.EDF.ERRTYP 


010254 


012737 


000034 


002200 












MOV 


*28,ERRN8R 


010242 


012737 


014626 


002202 












MOV 


4EM54.&RRMSG 


010250 


012737 


021540 


002204 












MOV 


f/ERRlO.ERRBLK 


3404 010256 


000157 


011274 






JMP 




20$ 


{TAKE ERROR EXIT 






3405 010262 


116501 


000001 




6$; 


MOVB 




1CR5),R1 


iGET RDSRH 






3406 010266 


042701 


177400 






BIC 




0177400, Rl 


{MASK OFF UNUSED BITS 






3407 010272 


125701 


010046 






CMPB 




2$,R1 


{COMPARE RCV'D STATUS TO EXPECTED 




3408 010276 


001016 








BNE 




7$ 


iBR IF MISMATCH 






3409 010300 


000137 


011160 






JMP 




17$ 


j CONTINUE 






3410 010304 


012737 


000001 


002542 




MOV 




Ol.REGNUM 


{SET USYRT REG NO. FOR RDSRH 






3411 010312 


005037 


002330 






CLR 




GDATA 


j SET EXPECTED DATA 






3412 010316 


110157 


002330 






MOVB 




Rl.GDATA 








3413 010322 


005057 


002332 






CLR 




BDATA 


iSET ACTUAL DATA 






3414 010326 


113757 


010046 


002332 




MOVB 




2$,BDATA 








3415 010334 


012757 


000001 


002342 


7$j 


MOV 




♦l.REGNUM 


;SET REG NO. FOR PRINTOUT 






3416 010342 


052765 


000001 


000002 




BIT 




ORERCHK.2CR5) 


{SEE IF RCV ERROR BIT SHOULD 


BE IGNORED 




3417 010350 


001447 








BEQ 




9$ 


jBR IF YES 






3418 








; CHECK 


RERR BIT 










3419 010352 


152701 


000200 






BITB 




♦RERR.R1 


{SEE IF EXPECTED BIT - 1 






5420 010356 


001022 








BNE 




8$ 


jBR IF YES 






5421 010360 


152757 


000200 


010046 




BITB 




♦KERR, 2$ 


{SEE IF ACTUAL BIT « 






5422 010366 


001440 








BEQ 




9$ 


j BR IF YES 






3423 








j STACK 


"RERR 


NOT CLEARED" MSG 








3424 010370 










GTDF 




EM35.ERR12 


j QUEUE "DEVICE FATAL" 


ERROR ♦ 29 




010370 


012737 


000001 


002176 












MOV 


*T.EDF,ERRTYP 


010376 


012757 


000035 


002200 












MOV 


*29,ERRNBR 


010404 


01275/ 


014654 


002202 












MOV 


*EM35,ERRMSG 


010412 


012757 


021714 


002204 












MOV 


#ERR12.ERRBLK 


3425 010420 


000137 


011274 






JMP 




20$ 


{TAKE ERROR EXIT 






3426 010424 


152757 


000200 


010046 


8$: 


BITB 




*RERR,2$ 


{SEE IF ACTUAL BIT - 1 






3427 010432 


001016 








BNE 




9$ 


iBR IF YES 






3428 








jSTACK 


"RERR 


NOT SET" M5G 








3429 010454 










GTDF 




EM36.ERR12 


j QUEUE "DEVICE FATAL" 


ERROR 30 




010434 


012757 


000001 


0021. 76 












MOV 


*T.EDF,ERRTYP 


010442 


012737 


0O0036 


002200 












MOV 


030.ERRNBR 


010450 


012757 


014675 


002202 












MOV 


#EM56,ERRMSG 


010456 


012737 


021714 


002204 












MOV 


0ERR12.ERRBLK 


3450 010464 


000157 


011274 






JMP 




20$ 


j TAKE ERROR EXIT 






3431 








{CHECK 


ROR BIT 










3432 010470 


152701 


000010 




9$: 


BITB 




♦R0R.R1 


tSEE IF EXPECTED BIT « 1 






5453 010474 


001022 








BNE 




10$ 


{BR IF YES 






5434 010476 


152757 


000010 


010046 




BITB 




*R0R,2$ 


{SEE IF ACTUAL BIT - 






3435 010504 


001440 








BF.Q 




11$ 


{ BR IF YES 






54 56 








; STACK 


"ROR NOT 


CLEARED" MSG 








3437 010506 










GTDF 




EM16.ERR12 


j QUEUE "DEVICE FATAL" 


ERROR Q 31 




010506 


012737 


000001 


0021/6 












MOV 


*T.EDf* ,ERRTYP 


010514 


012757 


000057 


002200 












MOV 


031.ERRNBR 


0.10522 


012757 


014527 


002202 












MOV 


*E.M16,ERRMSU 


010530 


01273/ 


021714 


002204 












MOV 


4ERR12.ERRBLK 


34 58 010536 


000137 


011274 






JMP 




20$ 


{TAKE ERROR EXIT 






3439 010542 


152737 


000010 


010046 


10$: 


BITB 




*R0R,2$ 


{SEE IF ACTUAL BIT » 1 






3440 010550 


001016 








BNE 




11* 


jBR IF YES 







w; 



CNDMDAO DMV11 LINE UNIT DIAG2 MACRO M1200 22 FEB-fl4 15:39 PAGF 51 2 
. ...RXCHAR -- RECEIVE A CHARACTER 



SEQ 0078 



3441 










{STACK 


"ROR NOT SET" M5G 


3442 


010552 










GTDF 


EM14.ERR12 




010552 


012737 


000001 


002176 










010560 


012737 


000040 


002200 










010566 


012737 


014265 


002202 










010574 


012737 


021714 


002204 








3443 


010602 


000137 


011274 






JMP 


20* 


3444 










; CHECK 


RABGA 


BIT 


3445 


010606 


132701 


000004 




11*: 


BITB 


4RABGA.R1 


3446 


010612 


001022 








BNE 


12* 


3447 


010614 


132737 


000004 


010046 




BITB 


*RABGA,2* 


3448 


010622 


001440 








BEQ 


13* 


3449 










; STACK 


"RABGA 


NOT CLEARED" MSI 


3450 


010624 










GTDF 


EM39.ERR12 




010624 


012737 


000001 


002176 










010632 


012737 


000041 


002200 










010640 


012737 


014712 


002202 










010646 


012737 


021714 


002204 








3451 


010654 


000137 


011274 






JMP 


20* 


3452 


010660 


132737 


000004 


010046 


12*; 


BITB 


♦RABGA.2* 


3453 


010666 


001016 








BNE 


13* 


3454 










{STACK 


"RABGP 


NOT SET" MSG 


3455 


0106 70 










GTDF 


EM40.ERR12 




010670 


012737 


000001 


002176 










010676 


012737 


O00O42 


002200 










010704 


012737 


014734 


002202 










010712 


012737 


021714 


002204 








3456 


010720 


000137 


011274 






JMP 


20* 


3457 










; CHECK 


REOM BIT 


3458 


010724 


132701 


000002 




13$: 


BITB 


WE0M.R1 


3459 


010730 


001022 








BNE 


14* 


3460 


010732 


132737 


000002 


010046 




BITB 


♦REOM. 2* 


3461 


010740 


001440 








BEQ 


15* 


346? 










; STACK 


"REOM 


NOT CLEARED" MSG 


3463 


010742 










GTDF 


EM30.ERR12 




010742 


012/37 


000001 


002176 










010750 


012737 


000O43 


002200 










010756 


012737 


014516 


002202 










010 764 


012737 


021714 


002204 








3464 


010772 


0O0137 


011274 






JMP 


20* 


3465 


010776 


132737 


000002 


010046 


14*: 


BITB 


♦REOM, 2* 


3466 


01100* 


001016 








BNE 


151 


346 7 










{STACK 


"REOM 


NOT SET" MS(> 


3468 


01100*. 










GTDF 


EM31.ERR12 




C UOCXi 


012/-.V 


nooooi 


002176 










01101* 


01273/ 


000044 


002200 










011022 


* 12/37 


014537 


002202 










011030 


012/37 


021714 


002204 








3469 


011036 


000137 


011274 






JMP 


20* 


34 70 










; CHECK 


RSOM BIT 


34 71 


011042 


132701 


000001 




15*: 


BITB 


♦RS0M.R1 


3472 


011046 


001022 








BNE 


16* 



I QUEUE "DEVICE FATAL" ERROR 32 

MOV 

MOV 
MOV 

MOV 
{TAKE ERROR EXIT 

? GEE IF EXPECTED BIT * 1 
{ BR IF YES 

{SEE IF ACTUAL BIT - 
j BR IF YES 



j QUEUE "DEVICE FATAL" ERROR 33 

MOV 
MOV 
MOV 
MOV 

{TAKE ERROR EXIT 

{SEE IF ACTUAL BIT * 1 

j BR IF YES 



4T,EDF,ERRTrP 
432.ERRN6R 
->EM14,ERRHSG 
♦ERR12.ERRBLK 



OT.EDF.ERRTYP 
033.ERRN6R 
♦EM39.ERRMSG 
0ERR12,ERRBLK 



j QUEUE "DEVICE FATAL" ERROR ♦ 34 

MOV *T.EDF,ERRTYP 

MOV 034,ERRN8R 

MOV *EM40,ERRMSG 

MOV 0ERR12.ERRBLK 

{TAKE ERROR EXIT 

j SEE IF EXPECTED BIT » 1 
BR IF YES 

SEE IF ACTUAL BIT - 
BR IF YES 



QUEUE "DEVICE FATAL" ERROR 3b 

MOV 
MOV 
MOV 
MOV 



{TAKE ERROR EXIT 

{SEE IF ACTUAL BIT • 1 

;BR IF YES 



♦T.EDF.ERRTYP 
♦35.ERRNBR 
0€M30,ERRMSG 
0ERR12.ERRBLK 



{ QUEUE "DEVICE FATAL" ERROR * 36 

MOV *T.EDF,ERRTrP 

MOV 036.ERRNBR 

MOV *€M31.ERRMSG 

MOV 0ERR12.ERRBLK 

{TAKE ERROR EXIT 

{SEE IF EXPECTED BIT • 1 
;6R IF YES 



CNOMOAQ OMV11 LINE INIT DIAG2 MACRO M1200 22 FEB-B4 15;39 
, ,».RXCHAR -- RECEIVE A CHARACTER 



PAGE 51 3 



SEQ 0079 



3473 011050 
34 74 011056 
3475 

3476 011060 

011060 
011066 
011074 
011102 

3477 011110 

3478 011114 

3479 011122 
3480 

3481 011124 



011124 
011132 
011140 
011146 
011154 



3482 
3483 
3484 
3485 
3486 
3487 
3486 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 
3496 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3506 
3509 
3510 
3511 
3512 
3513 
3514 
3515 
3516 
3517 
3518 
3519 



011160 
011164 

011166 
011174 
011176 
011202 
0112O4 

011206 
011210 

011212 
011220 
011222 
011226 
011230 

011232 
011236 
011240 
011242 

011244 
011252 
011254 
011260 
011262 

011264 

011270 
011272 
011274 
011300 
011302 
QX13Q4 



132737 
001440 



012737 
012737 
012737 
012757 
000137 
132737 
001016 



012737 
012737 
012737 
012737 
000137 

116502 
005001 

136527 
001004 
0O4537 
000001 
103433 

020102 
001415 

136527 
001004 
0O4537 
000000 
103421 

004537 
000001 
005201 
000751 

136527 
001004 
004537 
000001 

103404 

062705 
000241 
000403 
062705 
OO0261 
012602 
0126Q1 



000001 010046 



OOOOOi 
000045 
014460 
021714 
011274 
OOOOOI 



OOOOOI 
0OOO46 
014501 
021714 
011274 

000004 



000005 
005622 



000005 
006122 

011540 

000005 
006122 

000006 
000006 



BITB *RS0M,2$ 
BEQ l/l 
I STACK "RSOM NOT CLEARED" MSG 
GTDF EM28.ERR12 



002176 
002200 
002202 
002204 

010046 161: 



JMP 20$ 
BITB ORS0M.2* 
BNE 17$ 
I STACK "RSOfl NOT SET" MSG 
GTDF EM29.ERR12 



002176 
002200 
002202 
002204 



000040 



I7$j 
13* s 



311: 



000200 



22*: 



000100 19*: 



30*j 

20*; 
21*1 



JMP 

MOVB 

CLR 

BITB 
BNE 

JSR 

1 

BCS 

CMP 
BEQ 

BITB 

BNE 
JSR 

BCS 

JSR 
1 

INC 
BR 

BITB 
BNE 

JSR 

1 

BCS 

ADO 

CLC 

BR 

ADD 

SEC 

MOV 

MOV 



20$ 

4(R5),R2 
Rl 

5(R5),#6IT5 
31* 

R5.CKRACT 

20* 

R1.R2 
19$ 

5(R5),«6IT7 

22 $ 
R5.CKRDA 

20* 

R5.STEPLU 

Rl 
18$ 

5CR5),*6IT6 

30$ 

R5.CKRDA 

20* 

♦6.R5 

21* 

*6,R5 

(SP)».R2 

(SP)frJU 



jSEE IF ACTUAL BIT - 
iBR IT YES 



QUEUE "DEVICE FATAL" ERROR 9 37 

MOV 
MOV 
MOV 
MOV 



j TAKE ERROR EXIT 
iSEE IF ACTUAL BIT 
ibR IF YES 



j QUEUE "DEVICE FATAL" ERROR ♦ 38 

MOV 
MC " 
MTJV 
MOV 

I TAKE ERROR EXIT 

GET DESIRED NO. OF CYCLES 
INIT CYCLE COUNT 

* IS RXACT CHECK TO BE DISABLED ? 

♦ BR IF YES 

CHK FOR RACT - 1 

BR TO EXIT IF ERROR 

SEE IF REQUIRED CYCLES DONE YET 
BR IF YES 

♦ SEE IF INITIAL RDA CHECK DESIRED 

♦ BR IF NO 

CHK FOR ROA • 

BR TO EXIT IF ERKOR 

CLOCK LU FOR 1 CYCLE 

INCR CYCLE COUNT 
CONTINUE CLOCKING 

* IS FINAL RDA CHECK TO BE SKIPPED ? 

* BR IF YES 
CHK ROA • 1 

BR IF ERROR 

FIX UP RETURN ADRS 
SET C - FOR NO ERROR 
TAKE ERROR -FREE EXIT 
FIX UP RETURN AD0RES5 
SET C BIT FQR ERROR 
RESTORE R2 
RESTORE Ri 



♦ 1 .EDf .ERRTYP 

*3\cRRHV* 

#fr\?B,ERRMSG 

*ER*>12.ERRBLK 



♦T.EDF.ERRTYP 
♦ 3a.ERKNBR 
♦EM29.ERRWSG 
©ERR12.ERR8LK 



c/ 

CNDMOAO DMVLl I INI UNIT DIAG.? MACRO Ml^OO >V KF.B-64 l?i:39 PAGE bl -4 
RXCHAR - RECEIVE A CHARACTER 

3S*?0 011306 00020b RTS R5 (RETURN 

5521 



SEQ OOdO 



CNDMDAO DMVll LINE UNIT DTAG2 MACRO M1200 .'V FEB -84 15; 39 
♦ „*RCV1ST -• RECEIVE FIRST CHARACTER OF MESSAGE 



3523 
3524 

3525 
3326 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
3535 
3536 
3537 
353e 
3539 
3540 
3541 
3542 
3543 
3544 
3545 
3546 
3547 
3540 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3556 
3557 
3353 
3559 
3560 
3561 
3562 
3563 
3564 
3565 
3566 
356 7 
3563 
3569 
3570 
35 "i 1 
3572 
3573 
3574 
3575 
357tl 
3577 
3578 
3579 



.SBTTL RCV1ST 



0/ 

PAGE 52 
RECEIVE FIRST CHARACTER OF MESSAGE 



SEQ 0081 



011310 
011310 
013.312 
011314 
0113X6 
011320 
011324 
011330 
011332 
011334 
011340 
C11342 
011344 
011350 
011352 
011354 
011360 
011362 
011364 
011770 
011372 
C11374 
011402 
011404 
011406 
011410 
011414 
011416 
011420 
011424 
011426 
011432 
011434 
011436 
011442 
011444 
011446 
C11450 
011452 
011454 



01C146 
010246 
005001 
012502 
062702 
004537 
000000 
103446 
004537 
000000 
103442 
004537 
000000 
103436 
004537 
000001 
005201 
004537 
122000 
000000 
132 737 
00100$ 
020102 
002762 
004537 
000001 
103414 
020165 
002O04 
004537 
000000 
103405 
004537 
000001 
103401 
000241 
012602 
012601 
000205 



RCV1ST - THIS SUBROUTINE RECEIVES THE FIRST CHAR OF A MESSAGE AND MONITORS 
THE STATUS OF THE RECEIVER, FIRST, A CHECK IS MADE FOR RXACT • 0, 
RDA ■ 0, RSA • 0, RSOM - 0. THEN, THE LINE UNIT IS CLOCKED UNTIL 
RDA • 1. THE PROGRAM CHECKS FOR THIS TO OCCUR WITHIN 5 CYCLES AFTER 
THE NO. OF CYCLES PASSED IN THE SECOND WORD FOLLOWING THE CALL. 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, ANO THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



000003 
005622 



006122 
006562 
011540 
003534 
000200 

006122 

177776 
006122 

005622 



CALLING SEQUENCE j 

JSR R5 RCV1ST 

.WORD <EXPECTED RECEIVER CYCLE COUNT > 

************************** ************** **************************<«**** ***** 

RCV1ST: 

j SAVE Rl 
i SAVE R2 
lINIT CYCLE "OUNT 

iGET CYCLE COUNT LIMIT 

jCHK FOR RXACT » 



011372 





MOV 


Rl.-CSP) 




MOV 


R2.-CSP) 




CLR 


Rl 




MOV 


(R5)*,R2 




ADO 


*3,R2 




JSR 


R5,CKRACT 











BCS 


6$ 




JSR 


R5,CKRDA 











BCS 


6$ 




JSR 


R5.CKSE0M 











BCS 


61 


lit 


JSR 
1 


R5.STEPLU 




INC 


Rl 




JSR 


R5.READI 




USTATR 




2$: 


.WORD 







BITB 


*R0A,2$ 




BNE 


3* 




CMP 


R1.R2 




BLT 


11 




JSR 

1 

BCS 


R5.CKRDA 




61 


3*: 


CMP 


R1.-2CR5) 




BGE 


41 




JSR 


R5.CKRDA 











BCS 


6t 


4$: 


JSR 

1 

BCS 


R5.CKRACT 




61 


5$: 


CLC 




6$: 


MOV 


(SP)*,R2 




MOV 


(5P)*,R1 




RTS 


R5 



ibR TO EXIT IF 
jCHK FOR RDA - 

iBR TO EXIT IF 
jCHK FOR RSOM 

iBR TO EXIT IF 

l CLOCK LU FOR : 



ERROR 


ERROR 
■ 0. REOM 

ERROR 

. CYCLE 







i INCREMENT CYCLE COUNT 
jREAO USYRT STATUS REG 



l SEE IF RDA SET YET 

iBR IF YES 

i SEE IF LIMIT EXCEEDED 

jBR IF NOT YET 

i GO SYACK "RDA NOT SET" 



MSG 



iBR TO EXIT IF ERROR 

j SEE IF LESS THAN REQUIRED CYCLES 

l BR IF NOT 

i GO STACK "RDA NOT CLEARED" MSG 

iBR TO EXIT IF ERROR 
iCHK FOR RXACT ■ 1 

I BR TO EXIT IF ERROR 

jCLEAR C BIT FOR NO ERRORS 

iRESTORE R2 

jRESTORE Rl 

iRETURN (WITH C BIT ■ 1 IF ERROR) 



F7 
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,,,. ENOTRN -- SHUT DOWN TRANSMITTER/RECEIVER 



SEQ 0082 



3d81 
3582 
3583 
3584 
3585 
3586 
3587 
3588 
3589 
3590 
3591 
3592 
3593 
3594 
3595 
3596 
3597 
3598 
3599 
3600 
3601 
3602 
3603 
3604 
3605 
3606 
3607 
3608 
3609 
3610 
3611 
3612 
3613 
3614 
3615 
3616 



011456 
011456 
011462 
011466 
0114/0 
011472 
011476 
011500 
011502 
011506 
011510 
011512 
011516 
011520 
011524 
011526 
011530 
011534 
011536 



012537 
00*537 
000001 
103422 
004537 
000001 
103416 
004537 
120000 
000002 
004537 
000000 
004537 
000000 
103403 
004537 
000000 
000205 



.SBTTL ENOTRN -- SHUT DOWN TRANSMITTER/RECEIVER 

( ***** ***************** ********* ****************** ** ** * ***** ********* **** ** ** * 

I* ENOTRN - THIS SUBROUTINE TERMINATES A MESSAGE Br CLEARING TXEN AND RXEN, 
CLOCKING THE LINE UNIT FOR THE NUMBER OF CYCLES PASSED IN THE WORD 
FOLLOWING THE CALL. AND CHECKING FOR THE USYRT TRANSMITTER AND 
RECEIVER TO BE SHUT DOWN. 

IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, ANO THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



NOTE: THIS ROUTINE ASSUMES THAT TTLOOP SHOULD BE ENABLED. 



011516 
005462 



005622 

003660 

011540 
005462 

005622 



2$ 



6*: 



MOV 


CR5)*,2* 


JSR 

1 

BCS 


R5.CKTACT 


6$ 


JSR 


R5.CKRACT 


1 




BCS 


61 


JSR 


R5.WRITEI 


VIAORB 




TTLOOP 




JSR 


R5,STEPLU 


.WORD 





JSR 


R5.CKTACT 







BCS 


6* 


JSR 


R5.CKRACT 







RTS 


R5 



CYCLES TO CLOCK 



J* 
;* 
;♦ 
»* 
:* 
i + 
j* 

j* CALLING SEQUENCE : 

;* JSR R5.ENDTRN 

;* <N0, OF CYCLES TO CLOCK> 

; **************** ******<t *************************** ************* ************** 

ENOTRN: 

iGET DESIRED NO. OF 
iCHK FOR TXACT - 1 

I BR IF ERROR 

jCHK FOR RXACT - 1 



I CLEAR TXEN AND RXEN IN USYRT 
t ** BUT LEAVE TTLOOP ENABLED ** 

;CLOCK LU FOR DESIRED NO, OF CYCLES 

;CHK FOR TXACT ■ 

iBR IF ERROR 

iCHK FOR RXACT - 



r / 
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.,,. STEPLU -- CLOCK THE U5YRT N TIMES 



SEQ 0083 



3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 
3632 
3633 
3634 
3635 
3636 
3637 
3638 
3639 
3640 
3641 
3642 
3643 
3644 
3645 
3646 



.SBTTL STEPLU -- CLOCK THE USYRT N TIMES 

* STEPLU - THIS SUBROUTINE CLOCKS THE LINE UNIT FOR THE NUMBER OF CYCLES 

PASSED IN THE WORD FOLLOWING THE CALL. THE VIA ACR MUST BE PREVIOUSLY 
SET UP FOR Tl ONE -SHOT MODE, ANO THE Tl LATCHES MUST BE PREVIOUSLY SET 
TO CONTROL THE WIDTH OF THE CLOCK PULSE. ALL THAT THIS SUBROUTINE 
DOES IS TO LOAD 000 INTO THE HI BYTE OF THE Tl COUNTER, FOR THE 
DESIRED NUMBER OF TIMES. 



• 

;* 

j* 

;* 

;* 

!♦ 

{* 

J* 

,* 

5* 



011540 

011540 010146 

011542 012501 

011544 0O4537 

011550 120005 

011552 000000 

011554 005301 

011556 001372 

011560 012601 

011562 000205 



003660 



CALLING SEQUENCE : 

JSR R5. STEPLU 

.WORD <NLH8ER OF CYCLES TO CL0CK> 

STEPLU: 

j SAVE Rl 

lTN.IT CYCLE COUNTER 
1$: JSR R5.WRITEI jLOAD T1C-H, START COLTER, CLOCK 1 CYCLE 

jDECR CYCLE COUNTER 

i BR IF ALL CYCLES NOT DONE YfcT 

•.RESTORE Rl 

{RETURN 



MOV 


Rl.-(SP) 


MOV 


CW5)*.R1 


JSR 


R5.WRITEI 


VIAT1B 




000 




DEC 


ni 


BNE 


1* 


MOV 


(SP)> t Rl 


RTS 


R5 



CNOMOAO DMVll LINE UNIT DIAG2 
GLOBAL ERROR REPORT SECTION 



3648 
3649 
3650 
3651 
3652 
3653 
3654 
3655 
3656 
3657 
3658 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
3668 
36t>9 
3670 
3671 
3672 
3673 
3674 
3675 
3676 
3677 
3678 
3679 
3680 
3681 



MACRO M1200 22 FEB -84 15:39 
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PAGE 55 



SEQ 0084 



3632 
3683 
3684 
3685 
"*f S6 

"■■608 
J689 
3690 
3691 
3692 
3693 
3694 
3695 
3696 
36', 7 
3698 
3699 
3700 
3701 
3702 
3703 
3704 



011564 
011571 

011574 
011631 
011715 
011753 
012006 
012013 
012046 
012111 
012176 

012226 
012302 
012323 
012342 
012351 
012417 
012434 
012466 
012540 
012563 
012625 
012704 
012765 
013040 

013120 
013151 
013161 
013203 
013262 
013275 
013325 
013360 
013367 
013423 
013430 
013465 
013533 
013565 
013616 
013662 
013725 

014007 
014046 
014115 



045 
045 

045 
045 
045 
045 
045 
045 
045 
045 
045 

045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 

045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 
045 

12? 
125 
115 



116 
116 

116 
116 
116 
116 
116 
116 
116 
116 
116 

116 
101 
116 
116 
116 
123 
101 
101 
116 
116 
101 
116 
116 
116 

116 
124 
116 
101 
116 
117 
123 
124 
101 
124 
116 
116 
116 
116 
116 
116 
116 

105 
123 
111 



045 
000 

045 
045 
045 
045 
045 
045 
045 
045 
045 

045 
040 
045 
045 
045 
062 
040 
040 
045 
045 
040 
045 
045 
045 

045 
045 
045 
105 
045 
063 
064 
045 
105 
045 
045 
045 
045 
045 
045 
045 
045 

107 
131 
103 



.SBTTL GLOBAL ERROR REPORT SECTION 

{/ THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES 

}/ THAT ARE USED IN MORE THAN ONE TEST. 

;/////////////////////////////////////////////////////////////////// 



,NLIST 
ENDEMB 
NEWLIN 

FMT2 
FMT3 

FMT4 

FMT4A 

FMT4B 

FMT4C 

FMT5; 

FMT5A: 

FMT7j 

FMT10: 

FMT10A 

FMT11 

FMT12 

FMT13 

FMT14 

FMT15 

FMT15A 

FMT16; 

FHT16A 

FMT17: 

FMT17A 

FMT17B 

FMT17C 

FMT19 
FMT21 
FMT22 
FMT23 
FMT24 
FMT25 
FMT26 
FMT27 
FMT28 
FMT29 
FMT30 
FMT31 
FMT32 
FMT39 
FMT40 
FMT50 
FMT51 

EMI: 
EM2: 
EM3j 



BEX 

.ASCIZ 

.ASCIZ 

.ASCI? 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

, ASCIZ 
.ASCIZ 
. ASCIZ 



/*N*N/ 
/*N/ 



j USED TO TERMINATE ERROR MESSAGES 



/*NrfAFAILING REG - *T*ASEL*01/ 

/#N*A EXPECTED: *03*A ACTUAL: *03*A XOR: *03/ 

/UNKATHE CONTENTS OF ALL#T#N*T/ 

/*N*S1#03*S5*03*S5#03*S5*03/ 

/*N*T/ 

/*N*S5#03*S5#03tfS5#03rfS5*03/ 

/*N*A WHEN #03*A LOADED INTO BSEL1/ 

/*N#A ATTEMPTING "M-LOOP" FUNCTION CODE *02*A (*T*A)/ 

/*N*AMOIAG <W03i<A FAILED/ 

/*N*A EXPECTED :#08*A ACTUAL:*08*A X0R:*08/ 

/*A LSI A00R:#08/ 

/*N#08#08#08#08 / 

/*N*N*T/ 

/*N*T#03*S2#03*S£*03*S2*03*S2#03*S2*03/ 

/*S2*03*S2#03/ 

/*A DETECTED IN #T*T*A --/ 

/*A DETECTED a TEST PATTERN ELEMENT * *D2/ 

/*N#T*03*S4*03*S#03/ 

/f*N*T#03#S#03#S#O3*S4#03rfS*O3#S*03/ 

/*A VALUE SENT TO NPR CONTROL REGISTER: #03/ 

/*N*A VALUE READ FROM CONTROL REGISTER: #03/ 

/*N#A LSI-U MEMORY ADDRESS ACCESSED:#08/ 

/*N*A INFORMATION ON THE FIRST OF #05*A ERRORS:/ 

/#N*ATEST #02*A NOT RUN#N/ 

/*T#06*N/ 

/rfNrfAFAILING REG: / 

/HAEXPECTED: #03#S5#AACTUAL: *03#S5*AX0R : #03*N/ 

/*N*T*N*T*N/ 

/#03#S5#03#S5#03tfS5#03#N/ 

/*S4#03*S5*03*S5#03*S5#03#N/ 

/#T*T*N/ 

/KAEXTENDED REG AX*01*A- #T#N/ 

/*T*N/ 

/*N*AFOR BAUO RATE SPECIFIED./ 

/*N*AIMPROPER CONNECTOR TYPE SPECIFIED/ 

/*N*AF0R OPTION SPECIFIED,/ 

/rfN*ATEST #D2*A NOT RUN*N/ 

/*N#AFAILING RAM ADRS: «06tfA (OCT)#N/ 

/^WARESPONOING ADRS: #03*A (OCT)#N/ 

/*N*AEXPECTED COUNT: tfDltfA ACTUAL COUNT: *D1*N/ 

/REG NOT INITIALIZED BY MST CLR/ 

/USYRT NOT INITIALIZED BY PROGRAM RESET/ 

/MICRQ-DIAG* FAILURE/ 



MO AC OMV11 LINE 


UNIT 


0IAG2 


MACRO M1200 


22-FEB-84 


8AL ERROR REPORT SECTION 








3705 014141 


115 


122 


104 


EM4; 


.ASCIZ 


3706 014156 


116 


125 


114 


EM5: 


.ASCIZ 


3707 014206 


116 


125 


114 


EM6t 


.ASCIZ 


3708 014236 


122 


117 


122 


EM13: 


.ASCI/ 


3709 014265 


122 


117 


122 


EM14: 


.ASCII 


3710 014301 


122 


117 


122 


EM15: 


.ASCIZ 


3711 014327 


122 


117 


122 


EM16: 


.ASCIZ 


3712 014347 


122 


105 


101 


EM25; 


.ASCIZ 


3713 014375 


111 


116 


103 


EM26: 


.ASCIZ 


3714 014427 


111 


116 


103 


EM27j 


.ASCIZ 


3715 014460 


122 


123 


117 


EM28: 


.ASCIZ 


3716 014501 


122 


123 


117 


EM29j 


.ASCIZ 


3717 014516 


122 


105 


117 


EM30: 


.ASCIZ 


3718 014537 


122 


105 


117 


EM31: 


.ASCIZ 


3719 014554 


124 


130 


104 


EM32; 


.ASCIZ 


3720 014603 


124 


130 


104 


EM33; 


.ASCIZ 


3721 014626 


122 


103 


126 


EM34; 


.ASCIZ 


3722 014654 


122 


105 


122 


EM35: 


.ASCIZ 


3723 014675 


122 


105 


122 


EM36: 


.ASCIZ 


3724 014712 


122 


101 


102 


EM39; 


.ASCIZ 


3725 014734 


122 


101 


102 


EM40: 


.ASCIZ 


3726 014752 


117 


126 


122 


EH41 


.ASCIZ 


3727 014773 


117 


126 


122 


EH42, 


.ASCIZ 


3728 015010 


123 


127 


040 


EM43 


.ASCIZ 


3729 015035 


123 


127 


040 


EM44: 


.ASCIZ 


3730 015062 


123 


127 


040 


EM45, 


.ASCIZ 


3731 015107 


101 


123 


123 


EM47 


.ASCIZ 


3732 015142 


117 


104 


104 


EM48 


.ASCIZ 


3733 015175 


117 


104 


104 


EM49, 


.ASCIZ 


3734 015234 


105 


126 


105 


EM50 


.ASCIZ 


3735 015270 


105 


126 


105 


EM51 


.ASCIZ 


3736 015330 


124 


130 


040 


EM54 


.ASCIZ 


3737 015352 


122 


124 


123 


EM60 


.ASCIZ 


3738 015366 


122 


124 


123 


EM65 


.ASCIZ 


3739 015406 


122 


105 


107 


EM66 


.ASCIZ 


3740 015425 


122 


105 


107 


EM67 


.ASCIZ 


3741 015500 


125 


123 


131 


EM68 


.ASCIZ 


3742 015527 


124 


130 


101 


EM69 


.ASCIZ 


3743 015545 


124 


130 


101 


EM70 


.ASCIZ 


3744 015567 


122 


130 


101 


EM71 


.ASCIZ 


3745 015605 


122 


130 


101 


EM72 


.ASCIZ 


3746 015627 


124 


102 


115 


£M73 


.ASCIZ 


3747 015644 


124 


102 


115 


EM74 


.ASCIZ 


3748 015665 


122 


104 


101 


EM75 


.ASCIZ 


3749 015701 


122 


104 


101 


EM76 


.ASCIZ 


3750 015721 


122 


123 


101 


EM77 


.ASCIZ 


3751 015735 


122 


123 


101 


EH78 


.ASCIZ 


3752 0157 ,5 


122 


101 


115 


EM79 


.ASCIZ 


3753 0160, i 


103 


101 


122 


EM60 


.ASCIZ 


3754 016031 


103 


101 


122 


EM81 


.ASCIZ 


3755 016055 


111 


116 


126 


EM62 


.ASCIZ 


3756 016112 


115 


117 


104 


EMS3 


.ASCIZ 


3757 016141 


103 


124 


123 


EM64 


.ASCIZ 


3758 016156 


103 


124 


123 


EMS5 


.ASCIZ 


3759 016172 


103 


101 


122 


EM66 


.ASCIZ 


3760 016213 


103 


101 


122 


EMS 7 


.ASCIZ 


3761 016233 


115 


1X7 


104 


£Mee 


i .ASCIZ 



1-1/ 

PAGE 55-1 



/MRDY TIMEOUT/ 

/NULL CLK BIT STUCK AT 0/ 

/NULL CLK BIT STUCK AT 1/ 

/ROR NOT CLEARED BY SOM/ 

/ROR NOT SET/ 

.'ROR NOT CLEARED BY OC/ 

/>->0R NOT CLEARED/ 

'O'MD/URITE DATA ERROR' 

/INCORRECT DATA CHAR RCV'D/ 

/INCORRECT CRC BYTE RCV'D/ 

/RSOM NOT CLEARED/ 

/RSOM NOT SET/ 

/REOM NOT CLEARED/ 

/REOM NOT SET/ 

/TXDATA BIT NOT CLEARED/ 

/TXDATA BIT NOT SET/ 

/RCV'D DATA MISCOMPARE/ 

/RERR NOT CLEARED/ 

/RERR NOT SET/ 

/RABGA NOT CLEARED/ 

/RA8GA NOT SET/ 

/OVRR NOT CLEARED/ 

/OVRR NOT SET/ 

/SU PACK *1 INCORRECT/ 

/SW PACK *2 INCORRECT/ 

/SU PACK *S INCORRECT/ 

/ASSEMO BIT COUNT INCORRECT/ 

/OOO VRC PARITY BIT MOT SET/ 

/OOO VRC PARITY BIT NOT CLEARED/ 

/EVEN VRC PARITY BIT NOT SET/ 

/EVEN VRC PARITY BIT NOT CLEARED/ 

/TX UNDERRUN ERROR/ 

/RTS NOT SET/ 

/RTS NOT CLEARED/ 

/REG MISCOHPARE/ 

/REG NOT INITIALIZED BY UNIBUS RESET UNIT)/ 

/USYRT STATUS INCORRECT/ 

/TXACT NOT SET/ 

/TXACT NOT CLEARED/ 

/RXACT NOT SET/ 

/RXACT NOT CLEARED/ 

/TBMT NOT SET/ 

/TBMT NOT CLEARED/ 

/RDA NOT SET/ 

/RDA NOT CLEARED/ 

/RSA NOT SET/ 

/RSA NOT CLEARED/ 

/RAH ERROR LOADING MICROCODE/ 

/CARRIER NOT SET/ 

/CARRIER NOT CLEARED/ 

/INVALID ERROR COOE FROM 6502/ 

/MOOEM STATUS INCORRECT/ 

/CTS NOV CLRO/ 

/CTS NOT SET/ 

/CARRIER NOT CLRD/ 

/CARRIER NOT SET/ 

/MODEM ROY NOT CLRD/ 



SEQ 0085 
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GLOBAL ERROR REPORT SECTION 



SEQ 0086 



3762 
3763 
3764 
3765 
3 766 
3767 
3768 
3 769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 
3778 
3779 
3760 
3781 
3782 
3783 
3784 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
3794 
3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3804 
3805 
3806 
3807 
3808 
3609 
3810 
3811 
3812 
3813 
3814 
3815 
3816 
3017 
3818 



016256 
016300 
016331 
016366 
016422 
016442 
016466 
016530 
016607 
016665 
016735 



017005 
017043 
017105 
017144 
017207 
017237 
017277 
017340 
017342 
017365 
017455 
017545 
017565 
017605 
017625 
017677 
017735 
020005 
020033 
020050 
020106 
020150 
020163 
020220 
020261 
020315 

020355 

020357 
020363 
020377 
020414 
020436 
020457 
020507 
020521 

020556 
020574 



115 

122 

iar. 

124 
124 
124 
125 
125 
125 
125 
124 



117 
105 
105 
102 
123 
123 
123 
123 
123 
123 
122 



104 
103 
103 
115 
117 
117 
131 
131 
131 
131 
101 



102 
040 
102 
040 
040 
040 
040 
102 
040 
040 
040 
O40 
040 
040 
040 
040 
040 
1C4 
125 
122 
040 
126 
117 

040 
124 
040 

021 

116 
122 
127 
116 
116 
123 
125 
101 

126 
117 



123 
040 
123 
040 
102 
O40 
040 
000 
123 
122 
O40 
105 
101 
130 
040 
040 
040 
105 
123 
104 
040 
111 
122 
040 
062 
040 

000 

117 
105 
122 
120 
120 
105 
116 
114 

111 
122 



105 
040 
105 
040 
131 
040 
040 

105 
105 
040 
130 
103 
117 
116 
040 
040 
126 
131 
123 
040 
101 
102 
040 
103 
040 



120 
101 
111 
122 
122 
124 
104 
114 

101 
102 



EM89 

EM90 

EM91 

EM92 

EM100 

EM101 

EM102 

EM103 

EM104 

EM105 

EM106 



.SBTTL 

l 

J 



ASCIZ /MODEM RQv NOT SET/ 

ASCIZ /RECEIVER OVERRUN NOT SET/ 

ASCIZ /RECEIVER OVERRUN NOT CLEARED/ 

ASCI/ /TBMT INTERRUPT TEST FAILURE/ 

ASCIZ /TSO BIT NOT SET/ 

ASCIZ /TSO BIT NOT CLEARED/ 

ASCIZ /USYRT RESPONOEO TO THE WRONG ADDR/ 

ASCIZ /USYRT DIDN'T RESPOND TO SECONDARY STATION ADDR/ 

ASCIZ /USYRT DIDN'T RESPOfJO TO ALL-PARTIES-ADDRC 377 )/ 

ASCIZ /USYRT ASSEMBLED BIT COUNT WAS INCORRECT/ 

ASCIZ /TRANSMISSION ERROR CAS READ BY TSO BIT)/ 



...TEXT STRINGS FOR ERROR HANDLERS 
TEXT USED 8Y ERROR HANOLERS 



TXT 



TXT1: 

TXT2: 

TXT2A: 

TXT2B: 

TXT3: 

TXT4: 

TXT4A: 

TXT5: 

TXT6: 

TXT7; 

TXT7A* 

TXT8: 

TXT9: 

TXTlOs 

TXT11: 

TXT11A 

TXT11B 

TXT12 

TXT13 

TXT14 

TXT15 

TXT16 

TXT17 

TXT18 

TXT19 

TXT20 



.ASCIZ 
.ASCIZ 
.ASCIZ 
. ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 



/BSELO BSEL1 BSEL2 BSEL3/ 

/ BSEL4 BSEL5 BSEL6 BSEL7/ 

/BSEL10 BSEL11 BSEL12 BSEL13/ 

/ BSEL14 BSEL15 BSEL16 BSEL17/ 

/ BYTE SELECT REG'S ARE:/ 

/ SELO SEL2 SEL4 SEL6/ 

/ SEL10 SEL12 SEL14 SEL16/ 

/B/ 

/ SELECT REG'S ARE:/ 

ORB ORA DDRB DORA T1CL T1CH TILL T1LH / 
T2CL T2CH SR ACR PCR IFR IER ORA / 
/ 



/ REGISTERS 

/ 

/ EXPECTED: 

/ ACTUAL: 

/ XORj 

/ N P R 

/ 

/ 

/DEVICE CSR ADORESS 

/USYRT REGS :/ 

/ROSRL RDSRH TDSRL TDSRH/ 

/ PCSARL PCSARH PCR USTAT/ 

/VIA REGS :/ 

/0R8 ORA D0R8 DORA/ 

/ T1CL T1CH TILL T1LH/ 

/T2CL T2CH SR ACR/ 

/ PCR IFR IER ORA/ 



/ 
/ 

R E G I S T 
CONTROL DATA/ 
OUT ADOR. 
/ 



E R S:/ 
IN ADDR./ 



TXTNUL: .BYTE 21,0 



tCTL-Q -- THIS CWE HOPE) IS HARMLESS 



TXTMLO: .ASCIZ /HOP/ 

TXTML1: .ASCIZ /READ 1 BYTE/ 

TXTML2: .ASCIZ /WRITE 1 BYTE/ 

TXTML3: .ASCIZ /NPR-OUT 256 BYTES/ 

TXTML4; .ASCIZ /NPR-IN 256 BYTES/ 

TXTML5: .ASCIZ /SET MICROPROCESSOR'S PC/ 

TXTML6; .ASCIZ /UNDEFINED/ 

TXTML7: .ASCIZ /ALLOW U-PROCESSOR INTERRUPTS/ 

TXTVR: .ASCIZ /VIA REGISTER / 

TXTVRO: .ASCIZ /ORB/ 
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% .TEXT STRINGS FOR ERROR HANDLERS 



3819 
3820 
3821 
3822 
3823 
3824 
3825 
3826 
3827 
3828 
3829 
3830 
3831 
3832 
3833 
3834 
3835 
3836 
3837 
3838 
3839 
3840 
3841 
384? 
3843 
3844 
3845 
3846 
3847 
3848 
3849 
3850 
3851 
3852 
3853 
3854 
3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3863 
3864 



5865 
5866 
386 7 



3868 



5869 



020600 
020604 
020611 
020616 
020623 
020630 
020635 
020642 
02064 7 
020654 
020657 
020663 
020667 
020673 
020677 

020703 
020710 
020720 
020 730 
02074C 
020755 
020772 
021007 
021023 
021037 

021053 
021066 
021074 
021102 
021110 
021116 
021125 
021134 
021140 



021K6 
02U54 
021162 

021166 

021170 
021176 
0212C4 
021210 
02121b 
021224 



117 
104 
104 
124 
124 
124 
124 
124 
124 
123 
101 
120 
111 
111 
117 

116 
103 
104 
104 
101 
101 
101 
101 
101 
101 

125 
122 
122 
124 
124 
120 
120 
120 
125 



122 
104 
104 
061 
061 
061 
061 
062 
062 
122 
103 
103 
106 
105 
122 

120 
117 
101 
101 
104 
104 
104 
104 
104 
104 

123 
104 
104 

104 
104 
103 
103 
103 
123 



101 
122 
122 
103 
103 
114 
114 
103 
103 
000 
122 
122 
122 
122 
101 

122 
116 
124 
124 
104 
104 
104 
104 
104 
104 

131 

123 
123 
123 
123 
123 
123 
122 
124 



020357 
020414 

020507 

020556 
020574 
020611 
020630 
020642 
020657 
0206V 3 



0203*3 
0204 36 
020521 



020600 
020616 

020635 
020647 
020663 
020677 



020377 
020457 



020604 
020623 

020654 
020667 



"TXT_ 

TXTVR1 
TXTVR2 
TXTVR3 
TXTVR4 
TXTVR5 
TXTVR6 
TXTVR7 
TXTVR8 
TXTVR9 
TXTVRA 
TXTVRB 
TXTVRC 
TXTVRD 
TXTVRF. 
TXTVRF 

TXTNP: 
TXTNPO 
TXTNP1 
TXTNP2 
TXTNP3 
TXTKIP4 
TXTNP5 
TXTNP6 
TXTNP7 
TXTNP8 

TXTURj 

TXTURO 

TXTUR1 

TXTUR2 

TXTL«3 

TXTUR4 

TXTUR5 

TXTUR6 

TXTUR7 

.LIST 

.EVEN 



.SBTTL 



5EQ 0087 



.ASCIZ /ORA/ 

.ASCIZ /ODRB/ 

.ASCIZ /DDRA/ 

.ASCIZ /T1CL/ 

.ASCIZ /T1CH/ 

.ASCIZ /TILL/ 

.ASCIZ /T1LH/ 

.ASCIZ /T2CL/ 

.ASCIZ /T2CH/ 

.ASCIZ /SR/ 

.ASCIZ /ACR/ 

.ASCIZ /PCR/ 

.ASCIZ /IFR/ 

.ASCIZ /IER/ 

.ASCIZ /ORA/ 

.ASCIZ /NPR / 

.ASCIZ /CONTROL/ 

.ASCIZ /DATA HI/ 

.ASCIZ /DATA LO/ 

.ASCIZ /AODR. OUT EX/ 

.ASCIZ /ADOR. OUT HI/ 

.ASCIZ /ADOR. OUT LO/ 

.ASCIZ /ADOR. IN EX/ 

.ASCIZ /AOOR. IN HI/ 

.ASCIZ /AOOR. IN LO/ 

.ASCIZ /USYRT REG / 

.ASCIZ /ROSRL/ 

.ASCIZ /ROSRH/ 

.ASCIZ /TDSRL/ 

.ASCIZ /TDSRH/ 

.ASCIZ /PCSARL/ 

.ASCIZ /PCSARH/ 

.ASCIZ /PCR/ 

.ASCIZ /USTAT/ 
BEX 



...TEXT ADDRESS TABLES FOR ERROR HANDLERS -- "TXT. ...T" 
TEXT ADDRESS TABLES USED BY ERROR HANDLERS 



TXTMLT : . WORD TXTMLO, TXTML1 , TXTML2 1 TXTML3 , TXTML4 , TXTML5 , TXTML6 , TXTML7 



. WORD TXTVR 
TXTVRT : \ WORD TXTVRO, TXTVRI , TXTVR2 , TXTVR3 , TXTVR4 , TXTVI-J5 , TXTVR6 , TXTVR7 

. WORD TXTVR8 , TXTVR9 , TXTVRA , TXTVRB , TXTVRC , TXTVRD , TXTVRE , TXTVRF 



CNOMOAO DMV11 LINE UNIT D T AG2 MACRO M1200 
TEXT ADDRESS TADlES FOR ERROR HANDLERS 



V ! 

22 FFB-84 15:39 PAGE 55 -4 
"TXT T" 



3870 


021230 


020 703 








.WORD 


3671 


021232 


020710 


020720 


020730 


TXTNPT: 


.WORD 




021240 


020740 


020755 


020772 








021246 


021007 


021023 


021037 






3872 


021254 


021066 


021074 


021102 


TXTURT: 


.WORD 




021262 


021110 


021116 


021125 








021270 


021134 


021140 








3<?73 














3874 















SEQ 0088 



TXTNP 
TXTNP0,TXTNP1,TXTNP?,TXTNP3,TXTNP4 J TXTNP5,TXTNP6,TXTNP7,TXTNP8 

TXTUR0,TXTURl,TxTUR2,TXrUR3,TXTUR4,TXTUR5, TXTUR6, TXTUP7 



L / 
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SEQ 0089 



3876 

387 7 

3878 
3879 

3880 
3881 
3882 
3883 
3884 
3885 



3886 
3887 
3888 
3889 
3890 
3891 
3892 
3893 
3894 



3895 

3896 
3897 
3898 



3899 
3900 
3901 



3903 
3904 
3905 



3906 
3907 



021274 
021274 
021274 
021300 
021302 
021306 
021312 
021314 
021314 
021316 
021322 
021326 
021330 
021332 
021336 

021340 
021342 
021544 
021350 
021352 
021356 
021360 
021360 
021364 
021370 
021374 
021400 
021402 
021404 

021410 
021412 
021416 
021416 
021416 



021420 
021420 
021420 
021424 
021426 
021426 
021432 
021436 
021442 
021446 
021450 
021452 
021456 
021462 
021462 



105037 
010146 
013701 
022701 
002012 

010146 
012746 
012746 
010600 
104415 
062706 
000424 

001001 
005001 
022701 
002002 
012701 
006301 

016146 
013746 
012746 
012746 
010600 
104415 
062706 

012601 
004737 



104423 



113701 
006301 

016146 

012746 
012746 
012746 
010600 
104414 
062706 
004 737 



002331 

002330 
000017 



012046 



000006 

000007 
000006 



021146 
002330 
012111 
000003 



OOOOIO 
022724 



002342 



021254 
021053 

012434 
000003 



000010 
022352 



.SBTTL ....ERROR HANDLER -- ERR4 



M-LOOP TIMEOUT ERROR HANDLING 



BGNMSG 


ERR4 


CLRB 


GDATAfl 


MOV 


Rl, (SP) 


MOV 


GDATA.R1 


CMP 


017, Rl 


BGE 


5t 


PRINTX 


0FMT5.R1 



ERR4: : 
i MAKE SURE BIT 8 DOESN'T PRINT! 
;SAVE THE WORKING REGISTER 
jSAVE THIS TOR LATER 
;WAS THIS AN M-LOOP REQUEST? 
j YES, THEN REPORT THE FUNCTION CODE 
}NO t THEN IT MUST BE A BSEL1 SETTING 









MOV 




Rl.-CSP) 








MOV 




0FMT5, -CSP) 








MOV 




02, (SP) 








MOV 




SP.RO 








TRAP 




CtPNTX 








ADD 




06, SP 




BR 


20* 








5$: 


BNE 


6\ 


j IF IT WAS A 17, THIS IS A "1 


40P 


" ANO 




CLR 


Rl 


, THE TEXT POINTER MUST SO 1 


REFLECT. 


6*: 


CMP 


07, Rl 


iIS FUNCTION CODE > 7? 








BGE 


7$ 


j NO, THEN WE CAN HANDLE IT 








MOV 


06, Rl 


;YES, THEN IT'S UNDEFINED 


SAY SO 


7$: 


ASL 


Rl 


j CONVERT TO A WORD OFFSET 








PRINTX 


0FMT5A , GDATA , TXTML .*( Rl) 


j REPORT THE FAILING FUNCTION 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 




TXTMLTCR1),- 
GDATA, -CSP) 
0FMT5A, -CSP) 
03. CSP) 
SP,RO 
CIPNTX 
010, SP 



CSP) 



20$: MOV (SP)*,R1 
JSR PC.ERR5* 
ENDMSG 



{RESTORE THE WORKING REGISTER 
;DUMP THE SELECT REGISTERS 



L 10002: 



TRAP 



CiMSG 



ERR7A 



USYRT REGISTER ERRORS 



013746 002334 



.SBTTL ERROR HANOLER 

BGNMSG ERR7A 

ERR7A * * 

MOVB REGNUM,R1 

ASL Rl jAS PASSED, THIS WAS A BYTE OFFSET 

PRINTB OFMU5,OTXTUR,TXTURTCR1) 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 

ADD 
JSR PC.XORGB 
PRINTB OFMT3,GDATA,8DATA,XDATA 

MOV 



TXTURTCR1), (SP) 

OTXTUR, -CSP) 

0FMU5.-CSP) 

03 , - C SP ) 

SP.RO 

CIPNTB 

010, SP 



XUATA.-CSP) 



-1/ 
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3908 



3909 



3910 
3911 
3912 
3913 
3914 

3915 



3916 



3917 
3918 
3919 



3920 
3921 



3922 



021466 
021472 
021476 
021502 
021506 
021510 
021512 
021516 
021516 
021522 
021526 
021530 
021532 
021536 
021536 
021536 



021540 
021540 
021540 
021540 
021544 
021550 
021554 
021560 
021562 
021564 
021570 
021570 
021574 
021600 
021602 
021604 
02161C 
021614 
021616 
021616 
021622 
021626 
021632 
021636 
021640 
021642 
021646 
021652 
021652 
021656 
021662 
021666 
021672 
021676 
021700 
021702 
021706 



013746 
013746 
012746 
012746 
010600 
104414 
062706 

012746 
012746 
010600 
104414 
062706 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
062706 

0.'?/46 
012746 
010600 
104414 
062706 
013701 
006301 

016146 
0127*6 
012746 
012746 
010600 
104414 
062706 
004737 

013746 
013746 
013746 
01.2746 
012/46 
010600 
104414 
062 706 
004737 



002332 
002330 
011631 
000004 



000012 

011564 
000001 



000004 



002422 
020005 
013151 
000003 



000010 

013161 
000001 



000004 
002342 



021254 
021053 
013360 
000003 



0O0010 
022352 

002334 
002332 
002330 
013203 
000004 



000012 
023454 



PRINTB OENDEMB 



ENDMSG 





5EQ 0090 


NOV 


BDATA, (SP) 


MOV 


GDATA,~(SP) 


MOV 


OfMT3, -CSP) 


MOV 


04, -CSP) 


MOV 


SP.RO 


T RAP 


CJPNTB 


ADD 


012, SP 


MOV 


0ENDEM6, -CSP) 


MOV 


01, -(SP) 


MOV 


SP.RO 


TRAP 


C*PNT8 


ADD 


04, SP 


L10003: 





TRAP 



C$MSG 



.SBTTL ERROR HANDLER -- ERR10 ~- USYRT REG ERROR (XOR, REG PRINTOUT) 



BGNMSG ERR10 

PRINTB 0FMT21 . 0TXT12 , MPCSR 



PRINTB 0FMT22 



MOV 
ASL 
PRINTB 



REGNUM.R1 

Rl 

t+-MT27 i *TXTUR,TXTURT(Rl) 



JSR 
PRINTB 



PC.XORGB 
0F , MT23,GDATA t BDATA % XDATA 



JSR 



PC.&RR12* 



ERRlOt : 




MOV 


MPCSR, -CSP) 


MOV 


0TXT12.-C5P) 


MOV 


0FMT21.-CSP) 


MOV 


03, -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


010, SP 


MOV 


0FMT22.-CSP) 


MOV 


01. -CSP) 


MOV 


SP,RO 


TRAP 


C4PNTB 


ADD 


04, SP 


jGET PTR TO USYRT REG ASCII 




MOV 


TXTURT(Rl).-CSP) 


MOV 


OTXTUR, -CSP) 


MOV 


OFMT27.-CSP) 


MOV 


03, -CSP) 


MOV 


SP,RO 


TRAP 


CfPNTB 


ADD 


010, SP 


j COMPUTE XOR Or GOOD ANO BAD 


DATA 


MOV 


XDATA.-CSP) 


MOV 


BDATA. -CSP) 


MOV 


GDATA, -CSP) 


MOV 


OFMT23.-CSP) 


MOV 


04, -CSP) 


MOV 


SP.RO 


TRAP 


CiPNTB 


ADD 


012.SP 


iGET 6 PRINT USYRT REGISTERS 





N7 

22 -FEB -84 15:39 PAGE 56-2 
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ERROR HANDLER -- ERRIO - - USYRT REG ERROR CXOR, REG PRINTO 



SEG 0091 



3923 


021712 






ENDMSG 










021.712 








L 10004: 








021712 


104423 








TRAP 


C*MSG 


3924 
















3925 
3926 






















.SBTTL ERROR HANDLER -- ERR12 -- USYRT REG ERROR CUSYRT PRINTOUT) 




3927 

392? 
















021714 






BGNMSG 


ERR12 








021714 








ERR12?: 






3929 


021714 






PRINTB 


tfFMT21,#TXT12. MPCSR 








021714 


013746 


002422 






MOV 


MPCSR, -CSP) 




021720 


012746 


020C05 






MOV 


0TXT12, -CSP) 




021724 


012746 


013151 






MOV 


♦FMT21.-CSP) 




021730 


012746 


000003 






MOV 


♦3, -CSP) 




021734 


010600 








MOV 


SP.RO 




021736 


104414 








TRAP 


CIPNTB 




021740 


062706 


000010 






ADD 


010. SP 


3930 


021744 






PRINTB 


0FMT22 








021744 


012746 


013161 






MOV 


<>FMT22.-(SP) 




021750 


012746 


000001 






MOV 


•1,-CSP) 




021754 


010600 








MOV 


SP.RO 




021756 


104414 








TRAP 


CiPNTB 




021760 


062706 


000004 






ADD 


44, SP 


3931 


021764 


013701 


002342 


MOV 


REGNUM.R1 






3932 


021770 


C06301 




A5L 


Rl jGET PTR TO USYRT REG ASCII 




3933 


021772 






PRINTB 


«FMT27,V>TXTUR,TXTURT(R1) 








021772 


016146 


021254 






MOV 


TXTURTCR1), CSP) 




021776 


012746 


021053 






MOV 


4TXTUR.-CSP) 




022002 


012746 


013360 






MOV 


OFMT2 7,~CSP) 




022006 


012746 


000003 






MOV 


#3, -CSP) 




022012 


010600 








MOV 


SP.RO 




022014 


104414 








TRAP 


CIPNTB 




022016 


062706 


000010 






ADD 


410, SP 


3934 


022022 


004737 


023454 


JSR 


PCERR12* jGET 6 PRINT USYRT REGISTERS 




3935 


022026 
022026 






ENDMSG 


L 10005; 








022026 


104423 








TRAP 


C*MSG 


3936 
















3937 
















3938 
















3939 








.SBTTL ERROR HANDLER -- ERR13 -- RAM ADDRESS ERRORS 






3940 
















3941 


022030 
022O30 






BGNMSG 


ERR13 

ERR13:: 






3942 


022030 






PRINTB 


0FMT21,$TXT12,MPCSR 








022030 


013/46 


002422 






MOV 


MPCSR. -CSP) 




022034 


012746 


020005 






MOV 


0TXU2, -CSP) 




022040 


012746 


013151 






MOV 


4H-MT21, -CSP) 




022O44 


012746 


000003 






MOV 


♦3, -(SP) 




022050 


010600 








MOV 


SP.RO 




022052 


104414 








TRAP 


CJPNTB 




022054 


062706 


000010 






ADD 


•10.SP 


3943 


022060 






PRINTB 


0FMT4O.REGNUM 








022060 


013746 


002342 






MOV 


REGNUM. CSP) 




022064 


012746 


013616 






MOV 


4FNT40, -CSP) 




022070 


012746 


000002 






MOV 


42 , ( SP ) 




022074 


010600 








MOV 


SP.RO 



p w 
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3944 
3945 



022076 
022100 
022104 
022110 
022110 
022114 
0,^120 
022 1C4 



3946 



3947 
3948 
3949 

3950 
3951 

3952 



3953 
3954 



3955 
3956 
3957 
3956 
3959 

3960 



>96X 



3962 
5963 



022134 
022136 
022140 
022144 
022144 
022144 



022146 
022146 
022146 
022146 
022152 
022156 
022162 
022166 
022170 
022172 
022176 
022202 
022202 
022202 



022204 
022204 
0?2204 
0.22204 
<rt;?2210 
2214 
l>22*'20 

022226 
0X7730 

■'■■:-\r:234 

».' J :?234 
0il2236 
02?242 

022246 
022250 
022252 
022.256 
022262 
022i>62 



104414 
062706 

0O4737 

013746 
013746 
013746 
012746 
012746 
010600 
104414 
062706 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
062706 
004737 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
O62706 

010346 

012746 
012746 
010600 
104414 
062706 
004737 



000006 
022352 

002534 
002332 
002330 
013203 
000004 



000012 



002422 
02000V. 

01315). 
000003 



0OOO10 
0234!>4 



002422 
02OO05 
013151 
000003 



000010 



013662 
000002 



0OOO06 
023454 



TRAP 
ADD 

JSR PC.XORGB i COMPUTE XQR OF GOOD ANO BAD DATA 

PRINTB *FMT23,GDATA,BDATA,XDATA 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

ENOMSG 

L10006: 

TRAP 



.SBTTL ERROR HANOLER -- ERR20 -- USYRT REG DUMP 



J 



BGNMSG ERR20 

PRINTB ♦FMT21,«TXT12,MPCSR 



JSR PC.ERR12* 
ENOMSG 



ERR20: • 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 
jGET £ PRINT USYRT REGISTERS 



L 10007: 



TRAP 



.S8TTL . .. , ERROR HANDLER 



ERR21 



l 



BGfJISG ERR21 

PRINTB ♦FMT21.HXT12.MPCSR 



PRINTB *fMT50,R3 



JSR PC»ERRi2l 

ENOMSG 



USYRT "WRONG ADOR" ERROR 

ERR21:: 

MOV 

NOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

iGET/PRINT RESPONOING ADORESS 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

iGET G PRINT USYRT REGISTERS 

LiOOiOi 



SEQ 0092 



CIPNTB 
*6,SP 



XDATA, -CSP) 
BDATA.-CSP) 
GOATA, CSP) 
♦TMT23, -fSP) 
♦4, -(SP) 
SP.RO 
CIPNTB 
012, SP 



CtMSG 



MPCSR.-C5P) 
♦TXT12. CSP) 
•TMT21. -CSP) 
♦3.-CSP) 
SP.RO 
CIPNTB 
#10, SP 



CtMSG 



^CSR, CSP) 

♦ TXU2. (SP) 
•FMT21. -CSP) 
♦3. -'SP) 
SP.RO 
CUPNTB 

♦ 10, SP 

R3.-CSP) 

^TMT50.-(SP) 

♦2.-CSP5 

SP.RO 

CIPNTB 

#6»SP 



w 



CNDMOAO DMV11 I 
%x% , ERROR HANOI 



3964 
3965 
3966 
3967 
3968 

3969 



INL UNI! 01 AG J MACRO M1200 ,V IFH-64 15139 
ER ERR21 •- USYRT "WRONG ADDR" ERROR 

022262 104423 



PAGE 56-4 



SEQ 0093 



3970 



3971 
3972 



39/3 
3974 
3975 
3976 
3977 
397C 
3979 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
3966 
3969 
3990 
3991 
3^92 
3993 
3S94 
3995 
3996 
3997 



022264 
022264 
022264 
022264 
0222 ?0 
022274 
022300 
022304 
022306 
022310 
022314 
022314 
022320 
022324 
022330 
022334 
022336 
022340 
022344 
022350 
022350 
022350 



022352 
022354 
022360 
022366 

022372 
022374 



022376 
022376 
022402 
022406 
022412 



013746 0O2422 

012746 020005 

012746 013151 

012746 000003 

010600 

104*14 

062706 000010 

013746 002332 

013746 002330 

012746 013725 

012746 000003 
0106O0 
104414 

062706 0O0010 

004737 023454 



104423 



010146 

013701 0O2330 

013737 0O2332 

074137 0O2334 

012601 

000207 



TRAP 



CIMSG 



012746 017005 

012746 01720/ 

012746 011715 

012746 000003 
010600 



.SBTTL ERROR HANDLER 

l - — 



ERR22 



ASSEMBLED BIT COUNT ERROR 



BGNMSfi ERR22 

PRINTB *FMT21,0TXT12,MPCSR 



PRINTS *FMT5l,GDATA # BDATA 



JSR 
ENOMSG 



PC.ERR12* 



ERR22!} 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

iGET/PRINT GOOD/BAD BIT COUNTS 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

jGET C PRINT USYRT REGISTERS 



LlOOli: 



TRAP 



MPCSR.-(SP) 
0TXT12, -CSP) 
0FMT21, -<SP) 
03, -CSP) 
SP,R0 
CIPNTB 
010, SP 

BDATA.-CSP) 

GOATA,-CSP) 

#FMT5l,-(SP) 

#3, -CSP) 

SP.RO 

CIPNTB 

010.SP 



CIMSG 



S8TTL ERROR HANDLER SUBROUTINES 



SUBROUTINES USED ONLt BY ERRO« MANOLERS 



SBTTL ERROR HANDLER SUBROUTINE -- X0KG6 

PERFORM EXCLUSIVE OR BETWEEN "GDATA" £ "BDATA" PUTTING 
THE RESULT IN "XDATA" 



X0RG8; MOV 

MOV 

002334 MOV 

XOR 
MOV 
RTS 



Rl.-CSP) 
G0ATA.R1 

BOATA, XDATA 
Rl, XDATA 
(SP)*,R1 
PC 



■PRESERVE WORKING REGISTER 
iGET "GOOO" DATA 
lAND "BAD" DATA 
iPEWORM EXCLUSIVE OR 
iRESTORE Rl 
I RE TURN 



.SBTTL ERROR HANDLER SUBROUTINE 

i 

i 



ERR4* 



IDENTIFY C DUMP THE BYTE SELECT REGISTERS 
ERR4M PRINTX OFMT4,OTXT3,OTXT1 



MOV #TXT1,-(SP) 

MOV 0TXT3.-CSP) 

MOV 0FMT4,-(SP) 

MOV #3.-(SP> 

MOV SP.RO 



CNDMOAO DMVL1 LINE UNIT DIAG2 MACRO M1200 
ERROR HANOLER SUBROUTINE -- ERR4* 



3998 



M H-B-B4 15:39 PAGE 56 5 



3999 



4O0Q 



4001 



4002 



4003 



4004 



022420 


104415 




022422 


062706 


ooooio 


022426 






022426 


013746 


002214 


022432 


013746 


002212 


022436 


013746 


002210 


022442 


013746 


002206 


022446 


012746 


011753 


022452 


012746 


000005 


022456 


010600 




022460 


104415 




022462 


062706 


000014 


022466 






022466 


012746 


017043 


022472 


012746 


012006 


022476 


012746 


000002 


022502 


01C600 




022504 


104415 




022506 


062706 


000006 


022512 






022512 


01374b 


002224 


022516 


013746 


002222 


022522 


013746 


002220 


022536 


013746 


002216 


022532 


012746 


012013 


022536 


012746 


00OO05 


022542 


010600 




022544 


104415 




022546 


062706 


000014 


022552 






022552 


012746 


017105 


022556 


012746 


012006 


022562 


012746 


000002 


022566 


010600 




022570 


104415 




022572 


062706 


000006 


022576 






022576 


013746 


002234 


022602 


013746 


C02232 


0.22606 


013746 


002230 


022612 


013746 


002226 


022616 


012746 


011753 


022622 


012746 


00OO05 


022626 


010600 




022630 


104415 




022632 


062706 


000014 


022636 






022636 


012746 


017144 


022642 


012746 


012006 


022646 


012746 


000002 


022652 


010600 




022654 


104415 




022656 


062706 


0OO006 


022662 






022662 


013746 


002244 


022666 


013746 


002242 


022672 


013746 


002240 



PRINTX *f*MT4A l BSR0 f BSRl l BSR2,BSR3 



PRINTX *FMT4B ( 0TXT2 



PRINTX 0FMT4C,BSR4 I BSR5,BSR6,BSR7 



PRINTX 0TMT4B.0TXT2A 



PRINTX *FMT4A,8SR10 # BSR11,BSR12,BSR13 



PRINTX *FMT4B.*TXT2B 



PRINTX #FMT4C.BSR14.BSR15,BSR16,BSRJ 7 





5EQ 0094 


TRAP 


CIPNTX 


ADD 


*10,SP 


MOV 


BSR3.-C3P) 


MOV 


BSR2.-CSP) 


MOV 


BSRl.-(SP) 


MOV 


BSRO, -CSP) 


MOV 


♦FMT4A, -(SP) 


MOV 


05, -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


014, SP 


MOV 


*TXT2,-CSP) 


MOV 


*FMT4B, -CSP) 


MOV 


♦2, -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


♦6.SP 


MOV 


BSR7.-CSP) 


MOV 


BSR6.-CSP) 


MOV 


BSR5.-CSP) 


MOV 


BSR4.-CSP) 


MOV 


«FMT4C,-CSP) 


MOV 


♦5, -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADO 


014, SP 


MOV 


♦TXT2A. CSP) 


MOV 


* r MT4B.-CSP) 


MOV 


♦2 . - C SP ) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


♦6.SP 


MOV 


BSR13.-CSP) 


MOV 


BSR12.-CSP) 


MOV 


BSRll.-(SP) 


MOV 


BSR10.-CSP) 


MOV 


#f*MT4A,~CSP) 


MOV 


♦5. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


014. SP 


MOV 


♦ TXT26, -CSP) 


MOV 


♦f MT4B, -CSP) 


MOV 


♦2, -CSP) 


MOV 


SP.RO 


TRAP 


ClPNTX 


ADO 


*6.SP 


MOV 


BSR17. -CSP) 


MOV 


BSR16. -CSP) 


MOV 


BSR15.-CSP) 



r « 



■ > 



CNOMOAO DMvil LINE UNIT DIAG2 MACRO M1200 22-TF.B-84 15:39 PAGE 56-6 
.ERROR HANOLER SUBROUTINE - - ERR4 $ 



4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 



4013 



4014 



4015 



4016 



022676 
022702 
022706 
022712 
022714 
022716 
022722 



4017 
4018 
4019 



022724 
022724 
022724 
022730 
022734 
022740 
022744 
022746 
022750 
022754 
022754 
022/60 
022764 
022770 
022774 
0230O0 
023004 
023006 
023010 
02301* 
023014 
023020 
023024 
023030 
023032 
023034 
023O40 
023040 
023044 
023050 
023054 
023060 
023064 
023070 
023072 
023074 
023100 
023100 
023104 
023110 
023112 
023114 
023120 



013746 002236 

012746 012013 

012746 000005 

010600 

104415 

062706 000014 

000207 



012746 
012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
010600 
104414 
062706 
000207 



017237 
017342 
011715 
000003 



000010 

002214 
002212 
002210 
002206 
012323 
000005 



000014 

017277 
012006 
000002 



000006 

002224 
002222 
002220 
002216 
012323 
000005 



000014 

011564 
OOOOOl 



000004 



RTS 



PC 





SEQ 0095 


MOV 


BSR14, -CSP) 


MOV 


0TMT4C, -CSP) 


MOV 


#5, -CSP) 


MOV 


SP,RO 


TRAP 


CfPNTx 


AOD 


«14,SP 



.SBTTL ERROR HANOLER SUBROUTINE - - ERR5J 

i - - 

j COMMON ERROR SUBROUTINE TO PRINT SELSCT REGISTERS 
ERR5*: 

PRINTX 0FMT4 , 0TXT6 . 4TXT4 

MOV 0TXT4,-'"SP) 

MOV #TXT6,-CSP) 

MOV «FMT4,-CSP> 

MOV #3,~CSP) 

MOV SP,RO 

TRAP ClPNTx 

ADO #10, SP 

PRINTX *FMU1,WSR0 I WSR2,WSR4 I WSR6 jDUMP THE SELECT REGISTERS 

MOV WSR6.-CSP) 

MOV WSR4 , - C SP ) 

MOV WSR2.-CSP) 

MOV USRO.-(SP) 

MOV •FMUl.-CSP) 

MOV #5.-(SP) 

MOV SP.RO 

TRAP CIPNTX 

ADO 014.SP 

PRINTX <?FMT4B,*TXT4A 

MOV ♦TXT4A.-CSP) 

MOV #FMT4B,-CSP) 

MOV #2, -CSP) 

MOV SP.RO 

TRAP CIPNTX 

ADO *6 . SP 

PRINTX OfMTll.WSRlO,WSR12 ( WSRl4,WSRl6 jDUMP THE SELECT REGISTERS 

MOV USR16.-CSP) 

MOV WSR14.-CSP) 

MOV WSR12,-CSP) 

MOV USK10.-CSP) 

MOV •FMTll.-CSP) 

MOV #5 . - C SP ) 

MOV SP.RO 

TRAP C$PNTX 

ADD #14, SP 

PRINTB OENOEMB 

MOV *ENDEMB.-CSP) 

MOV 01, -CSP) 

MOV SP.RO 

TRAP CIPNTB 

ADD #4 . SP 

RTS PC 



r« 



CNOMOAO DMVll LINE UNIT DIAG2 MACRO M1200 22 FEB-84 15:39 PAGE 56-7 
ERROR HANDLER SUBROUTINE -- ERR11* 



4020 
4021 
4022 
4023 
4024 
4025 



4026 



4027 



4028 



4029 



4030 



023122 
023126 
023126 
023132 
023136 
023142 
023146 
023150 
023152 
023156 
023156 
023162 
023166 
023172 
023176 
023202 
023206 
023210 
023212 
023216 
023216 
023222 
023226 
023232 
023234 
023236 
023242 
023242 
023246 
023252 
023256 
023262 
023266 
023272 
023274 
023276 
023302 
023302 
023506 
023312 
023316 
023320 
023322 
023326 
023326 
023332 
023336 
023342 
023346 
023352 
023356 
023360 
023362 



004737 004426 



012746 
012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 



020163 
020150 
013262 
000003 



000010 

002274 
002272 
002270 
002266 
013275 
0O0O05 



000014 

020220 
013423 
000002 



000006 

002304 
002302 

002300 
002276 
013325 
000005 



000014 

020261 
013423 
00OO02 



000006 

002314 
002312 

002310 
002306 
013275 
000005 



000014 



.SBTTL ERROR HANDLER SUBROUTINE -- ERRll* 

! COMMON ERROR SUBROUTINE TO GET/PRINT VIA REGISTERS 

jGET VIA REGS FOR PRINTOUT 



ERR1H: JSR 

PRINTX 



PCGETVRS 
#FMT24,0TXT16.*TXT17 



PRINTX 0FMT25,VREGS*0, VREGS »2, VREGS *4 # VREGS *6 



PRINTX 0FMT29 0TXT18 



PRINTX 0FMT26 , VREGS *8 . , VREGS f 10 . , VREGS * 12 . , VREGS * 14 . 



PRINTX $FMT29 t *TXT19 



PRINTX 0FMT25. VREGS* 16. , VREGS *18. , VREGS *-20. ,VREGS*22. 



SEQ 0096 



MOV 


4TXT17, -CSP) 


MOV 


#TXT16,-(5P) 


MOV 


*FMT24,-rSP) 


MOV 


*3,~(SP) 


MOV 


SP,R0 


TRAP 


CIPNTX 


ADD 


410.SP 


MOV 


VREGS*6,-CSP) 


MOV 


VREGS *4.-CSP) 


MOV 


VREGS *2, -CSP) 


MOV 


VREGS*0, -CSP) 


MOV 


*FMT25,-(SP) 


MOV 


*5,-CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


*14,SP 


MOV 


*TXT18,~CSP) 


MOV 


*FMT29.-CSP) 


MOV 


*2,-CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


*6,SP 


MOV 


VREGS*14..-CSP) 


MOV 


VREGS*12..~(SP) 


MOV 


VREGS*10..-CSP) 


MOV 


VREGS*8..~CSP) 


MOV 


*FMT26,-(SP) 


MOV 


*5,-CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


*14.SP 


MOV 


*TXT19,-CSP) 


MO*' 


0FMT29.-CSP) 


KJV 


#2. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


*6,SP 


MOV 


VREGS f 22. , -CSP) 


MOV 


VREGS *20.>- CSP) 


MOV 


VREGS*16. , CSP) 


MOV 


VREGS* 16., CSP) 


MOV 


♦FMT25.-CSP) 


MOV 


*5,-CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


014, SP 



G8 



CNDMDAO DMVtl LINE UNIT 0IAG2 MACRO Ml.'OO 22 -FEB -84 15s39 PAGE 56-8 
ERROR HANDLER SUBROUTINE -- ERR11* 



4031 



4032 



4033 
4034 
4035 
4036 
4037 
4038 
4039 
4040 
4041 



4042 



4043 



023306 

023366 
023372 
023376 
023402 
023404 
023406 
023412 
023412 
023416 
023422 
023426 
023432 
023436 
023442 
023444 
023446 
023452 



4044 



023454 
023460 
023460 
023464 
023470 
023474 
023500 
023502 
0235O4 
023510 
023510 
023514 
U23520 
023524 
023530 
023534 
023540 
023542 
023544 
023550 
023550 
023554 
023560 
023564 
023566 
023570 
023574 
023574 
023600 
023604 
023610 
023614 
023620 



012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 
000207 



012746 
012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 



020315 
013423 
000002 



000006 

002324 
002322 
002320 
002316 
013325 
000005 



000014 



004737 004326 



020050 
020033 
013262 
000003 



OOOOIO 

002254 
002252 
002250 
002246 
013275 
000005 



000014 

020106 
013423 
000002 



000006 

002264 
002262 
002260 
002256 
013325 
000005 



PRINTX 0FMT29.0TXT20 



PRINTX 4FMT26 . VREGS *24 . , VREGS * 26 . . VREGS *28. , VREGS 1 30 



RTS 



PC 





SEQ 0097 


MOV 


0TxT20,-CSP) 


MOV 


0FMT29.-CSP) 


MOV 


02,-CSP) 


MOV 


SP.RO 


TRAP 


C*PNTX 


ADD 


06, SP 


MOV 


VREGS*30..-CSP) 


MOV 


VREGS*28.,-C5P) 


MOV 


VREGS *26.,- CSP) 


MOV 


VREGS. 24.. -CSP) 


MOV 


0FMT26.-CSP) 


MOV 


05, -CSP) 


MCV 


SP.RO 


TRAP 


CIPNTX 


ADD 


014. SP 



.SBTTL ....ERROR HANDLER SUBROUTINE -- ERR12* 

'; COMMON ERROR ROUTINE TO GET AND PRINTOUT USYRT REGISTERS 

ERR12*: JSR PC.GETURS ;GET USYRT REGS FOR PRINTOUT 

PRINTX 0FMT24,0TXT13,0TXT14 

MOV 0TXT14.-CSP) 

MOV 0TXT13.-CSP) 

MOV 0TMT24.-CSP) 

MOV 03, -CSP) 

MOV SP.RO 

TRAP C*PNTX 

ADD 010, SP 

PRINTX 0FMT25 , UREGS * ♦ UREGS *2 , UREGS *4 , UREGS *6 

MOV UREGS*6.-(SP) 

MOV UREGS*4.~(SP) 

MOV UREGS*2.-CSP) 

MOV UREGS *0. -CSP) 

MOV 0FMT25.-CSP) 

MOV 05. -CSP) 

MOV SP.RO 

TRAP C*PNTX 

ADD 014 , SP 

PRINTX OFMT29.0TXT15 

MOV 0TXT15,~CSP) 

MOV 0FMT29.-CSP) 

MOV 02, -CSP) 

MOV SP,RO 

TRAP CSPNTX 

ADD 06, SP 

PRINTX 0FMT26,UREGS*10, UREGS * 12. UREGS* 14, UREGS *16 

MOV UREGS*16, -CSP) 

MOV UREGS*14,-(SP) 

MOV UREGS* 12.- -CSP) 

MOV UREGS* 10. -CSP) 

MOV JFMT26.-CSP) 

MOV 05, -CSP) 



CNDMDAO DMvll LINE UNIT DIAG2 MACRO M1200 22 FEB -84 15:59 
ERROR HANDLER SUBROUTINE -- E.RR12S 



H8 

PAGE 56 9 





023624 


010600 




023626 


104415 




023630 


062706 


4045 


023634 


000207 


4046 






4047 







000014 



RTS 



PC 



MOV 
TRAP 

ADD 



.EVEN 



SEQ 0098 



SP.RO 
CtPNTX 
014, SP 



CNDMDAO DMV11 LINE UNIT DIAG2 

LOAD DEVICE PROTECTION TABLE 

4049 
4050 
4051 
4052 
4053 
4054 
4055 

4056 023636 
023636 

4057 023636 177777 

4058 023640 177777 

4059 023642 177777 

4060 023644 
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.SBTTL LOAD DEVICE PROTECTION TABLE 

//////////////////////////////////////////////////// '///// ///////////// ////// 
/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR. SO THAT IT CAN BE 
/ PROTECTED PROM TESTING. IF DESIRED. 
///////////////////////////////////////////////////////////////////////////// 



BGNPROT 

.WORD -1 

.WORD -1 

.WORD -1 
ENDPROT 



iDON'T CHK CSR ADRS 

{DON'T ZW. MASSBUS IN IT NO. 

i DON'T CHK DRIVE NO. 



LJPROT.. ; 



SEQ 0099 



w 



CNDMOAO DMVU LINE UNIT DIAG2 
INITIALIZE SECTION 



4062 
4065 
4064 
4065 
4066 
4067 
4068 
4069 
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SBUL INITIALIZE SECTION 



SEQ 0100 



//////////////////////////////////////////// ////////'///// /////////// 

/ THE INITIALIZE SECTION CONTAINS THE COOING THAT IS PERFORMED 

/ AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT UNIT. 

///////////////////////////////////////////////////////////////////// 



4070 
4071 



4072 
4073 
4074 
407b 
4076 
4077 
4078 
4079 
4080 
4081 
4082 
4033 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 



4092 

4093 
4094 
4095 



4096 

4097 
4098 
4099 



4100 

4101 
4102 



023644 
023644 

023644 
023644 
023650 
023654 
023660 
023664 
023666 



023672 
023676 
023702 
023706 
023712 
023716 
023722 
023724 
023732 
023740 

023742 
023750 



023764 
023764 
023770 
023772 
023772 



023774 
023774 
024000 
024002 
024002 



024004 
0240O4 
024010 
024012 
024013 



012746 
012746 
012746 
012746 
104437 
062706 



010637 
005037 
005037 
005037 
005037 
005737 
001007 
013737 
013737 
000406 

013737 
013737 



000310 
170000 
000140 
000003 

000010 



002544 
002350 
002404 
002402 
002406 
00c :74 

000OO4 
000OO6 



002376 
002400 



BGNINIT 



SETVEC 0140,^170000, 0340 



jOOT ROM ADDRESS 



LSINIT: : 






;JB REV A-0 


MOV 


#340, -CSP) 


MOV 


#170000. -CSP) 


MOV 


#140, (SP) 


MOV 


#3. -CSP) 


TRAP 


CISVEC 


ADD 


#10, SP 



002376 
005400 



000004 
00OOO6 



6$ 



023756 012737 000001 002374 9$ 



MOV 


SP.PSTACK 


CLR 


SUBRPC 


CLR 


CHPTYP 


CLR 


ERR0R1 


CLR 


SAVLEN 


TST 


FRSTIM 


BNE 


6$ 


MOV 


&#4»5AVE4 


MOV 


S#6,SAVE6 


BR 


91 


MOV 


SAVE4,S#4 


MOV 


SAVE6,0#6 


MOV 


#1, FRSTIM 



I SAVE BASE-LEVEL STACK POINTER 

CLEAR SU6R CALL PC 

CLEAR USYRT CHIP TYPE INDICATOR 

CLEAR ERROR FLAG 
; CLEAR CHAR LENGTH FROM SETUP 
{SEE IF FIRST TIME THROUGH AFTER LOAD 
iBR I r NOT 
j SAVE ERROR TRAP VECTOR 



j RESTORE ERROR TRAP VECTOR 



;MARK FLAG FOR NEXT TIME THRCUGH 



012700 
104447 

103415 



012700 
104447 

103411 



012700 
104447 

103411 



{SEE IF PROGRAM JUST STARTED, BR IF YES 
READEF #EF. START 



000040 



BCOMPLETE 



STARST 



000037 



{SEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF #EF. RESTART 



BCOHPLETE 



STARST 



000035 



{SEE IF THIS IS A NEW PASS, BR IF YES 
READEF #EF. NEW 



BCOMPLETE NEUST 
{SEE IF PROGRAM WAS JUST CONTINUED 



MOV 
TRAP 

BCS 



MOV 
TRAP 

BCS 



MOV 

TRAP 

BCS 



#EF. START, RO 
CtRFFG 

STARST 



#EF. RESTART.RO 
CIREFG 

STARST 



tfF.NEU.RO 

CSREFG 

NEWST 



CNDMDAO DMVU LINF. UNIT DIAG2 
INITIALIZE SECTION 



4103 



4104 

4105 
4106 
4107 
4108 
4109 
4110 
4111 
4112 
4113 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 



4122 

4123 

4124 
4125 
4126 
4127 
4128 
4129 
4130 
4131 
4132 
4133 
4134 
4135 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 

4148 
4149 
4150 
4151 



024014 
024014 
024020 
024022 
024022 
024024 

024026 
024026 



024032 
024036 
02403c 
024044 
024050 



024056 
024056 
024062 
024062 
024066 
024070 
024072 
024072 
024074 
024100 
024102 
024110 

024114 
024116 

024122 
024124 
024126 
024132 



024134 
024140 
024144 
024152 
024156 
024162 
024166 
024172 
024176 

024202 
024202 
024204 
024206 
024210 

oa42 xa 



012700 000036 
104447 

103473 
000414 



005037 002416 



005037 002410 



012737 
005237 
012737 



005237 

013700 
104442 
010001 

103403 
006337 
000766 
053737 
006337 

012102 
012703 

010223 
005202 
022703 
001373 



011137 
012137 
062737 
012137 
012137 
012137 
012137 
012137 
011137 



104433 
005000 
000240 
077002 



177777 
002416 
000001 



002340 
002340 

002412 

002412 
002412 

002422 
002462 



002462 
002464 
000004 
002466 
002470 
0024 72 
002474 
002476 
002500 
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READEF V^EF. CONTINUE 

BCOMPLETE ENDIT 
BR GETPRM 



SEQ 0101 



MOV gef.cuntinue.ro 

TRAP C*RF.FG 
BCS ENDIT 



STARST: 



CLR 



STARES 



jCLEAR DEVICE MAP 



002340 
002412 



NEWST: 



CLR 



OEVMAP 



MOV 


0-1, LOGDEV 


INC 


STARES 


MOV 


36IT0, DEVPTR 



j CLEAR FLAG TO SHOW JUST HAD STA OR RES 



{RESET LOGICAL DEVICE TO -1 

{INCREMENT NO, OF PASSES SINCE STA OR RES 

jINIT DEVICE MAP BIT POINTER 



5 GET UNIBUS ADDRESS, VECTOR, PRIORITY LEVEL, SWITCH PACKS 
j CONNECTOR INFORMATION FOR THIS LOGICAL DEVICE 
GETPRM: 



TEST 



INC 
GPHARD 



LOGDEV 
LOGDEV, Rl 



j INCREMENT LOGICAL DEVICE NUMBER 
jGET P-TABLE POINTER INTO Rl 



BCOMPLETE 



10$ 



002410 10$ 



11$: 



002464 



s ISSUE 



15$: 

tNOXTj 



ASL 

BR 

BIS 

ASL 

MOV 
MOV 

MOV 
INC 
CMP 
BNE 



MOV 
MOV 
ADD 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
LSI BUS 
BRESEY 

CLR 
NOP 
SOB 



DEVPTR 
GETPRM 

DEVPTR, DEVMAP 
DEVPTR 

(R1)*,R2 
*MPCSR,R3 

R2.CR3)* 

R2 

*6SEL17*2,R3 

11$ 



(RD.MPIVEC 

(R1)*,MP0VEC 
*4,MP0VEC 
(Rl)*.MPniOR 
(Rl)f.LUSUll 
CR1)*.LUSWI2 
(R1)*,BRDTYP 
CR1)*,TSTC0N 
CRD. BORATE 
RESET, TO 1NXT 



RO 
R0,15$ 



MOV 

TRAP 

MOV 

BCS 



LOGDEV, RO 

CiGPHRD 

R0.R1 

10$ 



jBR IF DEVICE AVAILABLE 

j SHIFT DEVICE POINTER 
I SKIP THIS DEVICE 
jSET BIT FOR THIS DEVICE 
l SHIFT OIT POINTER 

;R2-CSR ADOR VALUE 

jR3-P0INTER TO CSR ADDR STORAGE AREA 

»PUT CSR ADDRESSES IN 'BSEL' AREA 

j BUMP BSEL AODR 

j ALL 16 ADDRESSES MOVED ? 

j NO: DO ANOTHER ADDRESS 

jYES: CONTINUE 

jGET DMV11 INPUT INTRPT VECTOR 

iGET DMV11 OUTPUT INTRPT VECTOR 
jGET DMV11 DEVICE PRIORITY 
{GET LU SWITCH PACK *1 
jGET LU SWITCH PACK #2 
jGET DMV-11 BOARD TYPE 
jGET TEST CONNECTOR INDICATOR 
iGET BALK) RATE FOR THIS DEVICE 
DMV11 

TRAP C$RESET 
l* TIME OELA> TO ALLOW COMPLETION 
,0 OF DMVU MXCRODIAGNOSTICS. 



CNDMDAO DMVil LINF. UNIT DIAG2 
INITIALIZE SECTION 



8 
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SEQ 0102 



4152 024512 
024^12 
024212 



ENDINIT 



104411 



L10013; 



TRAP 



CilNIT 



M8 



CNDMDAO OMVU LINE UNIT DIAG2 
AUTO DROP UNIT SECTION 



4154 

4155 
4156 
4157 
4156 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 



4171 
4172 



4173 
4174 
4175 
4176 
4177 
4178 
4179 
4160 
4181 
4182 
4183 
4184 
4165 
4186 
4187 
4188 



4189 
4190 
4191 



4192 
4193 
4194 
4195 



4196 
4197 



024214 
024214 

024214 
024214 
024220 
024224 
024230 
024234 
024236 
024242 
024246 
024252 

024256 
024260 
024262 

024264 
024270 
024274 
024276 
024300 
024302 

024304 
024304 
024310 
024312 
024316 
024320 
024320 
024324 



012746 
012746 
012746 
012746 
104437 
062706 
005037 
012702 
013703 

105723 
006302 
103375 

013703 
012702 
005723 
006302 
006302 
103374 



012700 
104436 
005737 
001403 

013700 
104451 



024326 000240 



024330 
024330 
024330 

024332 



104461 
050237 



000000 
024332 
000004 
000003 

000010 
002552 
000001 
002422 



002422 
000001 



000004 
002552 

002340 
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.SBTTl. AUTO DROP UNIT SECTION 

////////////////////////////////////////////////////''//////////////////////// 
/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P -TABLE 
/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY. 
///////////////////////////////////////////////////////////////////////////// 

* i . + **4.+ + + *+.± + + + + + ±A* + * + ±** + +.±*±± + + ±± + + ± + ± + + + * + + + b* + + m. + m + ± + + * + m m + 4. + J m 4 + 

THIS ALGORITHM IS THE SAME A CNDMA TEST - 1 EXCEPT THAT TEST 
UILL JUST REPORT THE FAILURE AND GO ON - THIS ROUTINE WILL CAUSE THE 
DEVICF TO BE DROPPED IF A BUS -TIMEOUT OCCURS WHEN ANY OF THE CSR'S 
ARE ACCESSED WITH EITHER A "TST" OR "TSTB" INSTRUCTION. 



SEQ 0103 



BGNAUTO 



SETVEC #4,#AD.HIT,<K> 



♦O.-CSP) 

0AD.HIT. CSP) 
#4 , - ( SP ) 
03, -CSP) 
CSSVEC 
410,SP 



1$ 



2* 



CLR 


TMPO 


MOV 


♦1.R2 


MOV 


BSEL0,R3 


TSTB 


CR3)f 


ASL 


R2 


BCC 


1* 


MOV 


BSEL0.R3 


MOV 


01, R2 


TST 


CR3)f 


ASL 


R2 


ASL 


R2 


8CC 


2i 



CLRVEC 04 



002552 





TST 
BEQ 
DODU 


TMPO 
AD. OK 
LOGDEV 


AD. OK: 


NOP 
ENDAUTO 




AG. HIT; 


BIS 


R2.TMP 



LSAUTO: : 

{SETUP INVALID-ADDRESS TRAP VECTOR 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

I INITIALIZE TRAP FLAG REGISTER 

» FLAG BIT 

jINIT ADDRESS POINTER 

j ACCESS THE CSR' S BY BYTES. 



jRE-INIT ADDRESS POINTER 

;RE-INIT FLAG BXT 

I ACCESS THE CSR'S BY WORDS. 



j RESTORE THE VECTOR TO OS 

MOV 04.R0 
TRAP C1CVEC 

jDID WE GET HIT WITH AN INVALID ADDRESS TRAP? 

iNO, EXIT TEST 

iYES, DROP THIS LOGICAL DEV. 

MOV LOGDEV ,R0 
TRAP C*DOUU 

{(FOR PATCHING IN A HALT IF NECESSARY) 



L 100 14: 



TRAP CSAUTO 



{FLAG THE HIT IF WE GET IT! 



N8 
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SEQ 0104 
AUTO DROP UNIT SF.CTION 

4198 024336 000002 RTI j RE TURN 

4199 



*) r 



CNDMOAO DMVll I. INF. UNIT D1AG2 

CLEANUP CODING SECTION 

4201 
4202 
4205 
4204 
4205 
420*> 
4207 

4208 024 540 
024340 
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SEQ 0105 



.5BTTL CLEANUP COOING SECTION 

»/ THE CLEANUP COOING SECTION CONTAINS THE CODING THAT IS PERFORMED 

\/ AT THE ENO OF THE TE5T SEQUENCE ON A PARTICULAR UNIT. 

I ///////////////////////////////////////////////////////////////////// 



BGNCLN 



LICLEANj: 



4211 024340 
024540 
024340 



ENDCLN 



104412 



L10015: 



TRAP 



CICLLAN 



CNOMOAO DMV11 I INF UNIT D1AG2 MACRO M1200 22 rEU-84 15:39 



page 6i 



DROP UNIT SECTION 



4213 
4214 
4215 

42ie 

4217 
4216 
4219 
4220 



4221 
4222 

4223 



024542 

024542 

024 542 
024542 
024544 
02434* 

024344 



104453 



104453 



• SBTTl. DROP UNIT SECTION 

» ///////////////////////////////////////////////// ///'//////////////////////// 

1/ THE DROP-LNIT SECTION CONTAINS THf COOING THAT CAUSES A DF.VICF 

1/ TO NO LONGER BE TESTED. 

I ///////////////////////////////////////////////////////////////////////////// 



BGNOU 

I ISSUE UNIBUS RESET TO CLEAN UP 
BRESET 

ENODU 



LfOUt: 



L10016: 



TRAP 



TRAP 



CIRESFT 

C*DU 



SEQ 0106 



CNOMOAO DHM.1 LINE UNIT DIAG2 
ADD UNIT SfcCTlON 



4225 
4226 
422/ 
4228 
4229 
4230 
4251 
4232 
4233 
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SEQ 0107 



.SBTU. ADD UNIT SECTION 

j ///////////////////////////////////////////////////////////////////////////// 
i/ THE AOD-UNIT SECTION CONTAINS THE COOING THAT CAUSES A DEVICE 



»/ TO BE (A) TESTED FOR THE FIRST TINE 
1/ "EF.AUNIT" IS SET, THE UNIT WILL BE 



OH (B) RESUMED 
TESTED AS A NEW 



IN TESTING. 

UNIT. 



IF 



\///////////////////////////////////////////////////////////////////////////// 



4234 



024346 
024346 
024346 
024346 
024346 



BGNAU 
ENDAU 



104452 



I.IAU;: 
110017: 



TRAP 



C*AU 



[~Q 



CNDMDAO DMV11 LINE UNIT DIAG2 
TEST 1 - VRC PARITY GENERATION 
4258 



4259 
4260 
4261 
4262 



4263 
4264 
4265 
4266 
4267 
4268 
4269 

4270 



4271 
4272 
4273 
4274 
4275 
4276 
4277 
4278 
4279 
4280 



024350 



024350 
024350 
024350 
024352 

024356 
024362 
024364 
024366 
024370 
024370 
024372 
024372 
0243/4 

02*376 
024402 

024404 

024406 

024412 
024414 
024416 
024420 
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TEST 

.SBTTL TEST 1 - - VRC PARITY GENERATION TEST 



104402 

004737 005344 

004537 007324 
042226 
000340 
1030C3 

104460 

104410 
000310 

004537 007734 

000000 

000000 

004537 003660 
120402 
000000 
103003 



TEST 1 -- VRC PARITY GENERATION TEST 



* SUBTEST 1 - TEST OF CORRECT ODD VRC PARITY GENERATION : 

* THE LINE UNIT IS PLACED IN CHAR MOOE, WITH 000 VRC. ANO 7 -BIT CHARS SELECTED 

* THE DATA CHARS IN PATTERN Q ARE LOADED/TRANSMITTED/READ. AS THE 8TH BIT 

* (PARITY BIT) Of EACH DATA CHAR IS SENT TY*. PROGRAM CHECKS TSO FOP THE PROPER 

* STATE. FOR THE FIRST 4 CHARS IN PATTERN Q THE PARITY BIT SHOULD - 1, FOR THE 

* LAST 4 CHARACTERS IT SHOULD ■ 0. 
* 

* SUBTEST 2 - TEST OF CORRECT EVEN VRC PARITY GENfcrtATTON : 

* THE LINE UNIT IS PLACED IN CHAR MOOE, WITH EVEN VRC ANO 7 -BIT CHARS SELECTED 

* THE DATA CHARS IN PATTERN Q ARE LOADED/TRANSMIT TED/hr.xO, AS THE 8TH BIT 

* CPARITY BIT) OF EACH DATA CHAR IS SENT THE PROGRAM CHECKS TSO FOR THE PROPER 

* STATE. FOR THE FIRST 4 CHARS IN PATTERN Q THE PARITY BIT SHOULD » 0, FOR THE 

* LAST 4 CHARACTERS IT SHOULD - 1. 
* 
* 

* NOTE! SINCE THE ROUTINE "SERIAL" TREATS THE FIRST BIT RECEIVED FROM THE 

* USYRT AS THE MSB, THE "EXPECTED BIT SEQUENCE" WILL HAVE A REVERSED 

* BIT ORDER, 

- -** + ***** + ******** + *.** + +.*** + ****** + + *****,****** + **** + **4*l * + *****+ ********** 



DATA PATTERN Q * OOO,OO3,014,O60,OOl f OO7 # O37,177 



BGNTST 



Tl 



SUBTEST 01: ODD VRC PARITY CHECK 
BGNSUB 



JSR 



PC.INIDHV 



Tl.l: 
jINIT DMV-11. ENTER M-LOOP 



TRAP 



CJBSUB 



JSR R5.INITRN 

DDCMP ! OVRC ! 226 

TXDL 

BCC ,*8. 

ERROR 

ESCAPE SUB 



JSR 
000 


JSR 

TDSRL 

000 

BCC 

ERROR 



R5.TXCTRL 



R5.WRITEI 



.♦8* 



iLOAD 1 SOM, CLK TX UNTIL ACTIVE 

I SET DDCMP, 000 VRC CHECK , SYNCH -226 

I USE 7 BIT TX CHARS 

1 BR IF NO ERROR 

I REPORT STACKED ERROR 

TRAP 

j SKIP REMAINDER OF THIS SLGTEST 

TRAP 
.WORD 

j CLEAR TSOM 



j LOAD 1ST DATA CHARACTER (000) 



j BR IF NO ERROR 

i PRINT STACKED ERROR MESSAGE 



CIERROR 

C$ESCAPE 
L10021-. 



SEQ 0108 



CNDMDAO DMVU LINE UNIT DIAG2 MACRO M1200 
TEST 1 -- VRC PARITY GENERATION TEST 



4281 



4282 
4283 
4284 
4,385 
4286 

4287 



4288 
4289 
4290 
4291 
4292 
4293 

4294 



4295 
4296 
4297 
4298 
4299 
4300 
4301 
4302 
4303 
4304 
4305 

4306 



4307 
4308 
4309 
4310 
4311 
4312 

4313 



4314 
4315 
4316 
4317 
4318 
4319 
4320 
432X 



024420 
024422 
024422 
024424 

024426 
024432 
024434 

024436 
024436 
024440 

024440 
024442 

024444 
024450 
024452 
024454 
024456 
024456 
024460 
024460 
024462 

024464 
024470 
024474 
024500 

0245O4 
024510 
024512 
024514 
024516 
024516 
024520 
024520 
024522 

024524 
024530 
024532 
024534 
024536 
024536 
024540 
024540 
024542 

024544 
024550 

024552 
024556 
024560 
024562 



104460 

104410 
000260 

004537 007042 

000000 

103003 

104460 

104410 
000242 



T9 
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ESCAPE SUB 

READ SYNCH CHARACTER 



JSR 


BCC 
ERROR 



R5,CHKTS0 
.♦8. 



ESCAPE SUB 







SEQ 0109 




TRAP 


CSERROR 


{AND EXIT SUBTEST 








TRAP 


CiESCAPE 




,WORD 
"SYNCH" 


L10021-. 


{CHECK 1ST BIT OF" EXPECTED 




l CHARACTER (SHOULD BE 0) 






j BR If" NO ERROR 






.-REPORT STACKED ERROR 








TRAP 


CfERROR 


{AND EXIT SUBTEST 








TRAP 


CtESCAPE 




.WORD 


L10021-. 



004537 
000007 
00C150 
103003 

104460 

104410 
000222 

012703 
0127O4 
112337 
112437 

004537 
120402 
OOOOOO 
103003 

104460 

104410 
000162 

004537 
0000O7 
OOOOOO 
103003 

104460 

104*10 
000142 

004537 
000001 

004537 

000OO1 
1Q3006 



007202 



JSR 

7, 

150 

BCC 

ERROR 

ESCAPE 



R5, SERIAL 
SUB 



iREAO REMAINING 7 BITS OF "SYNCH" CHARACTER 

t (OFF OF TSO BIT) 

I EXPECTED BIT SEQUENCE (0010110) 

j BR IF NO ERROR 

{REPORT STACKED ERROR 



{AND EXIT SUBTEST 



003012 
003021 
024512 
024532 

003660 



1$; 



2$: 



C07202 



3$: 



011540 
007042 



MOV 
MOV 
MOVB 
MOVB 

JSR 

TOSRL 

000 

BCC 

ERROR 

ESCAPE 



JSR 

7 

000 

BCC 

ERROR 

ESCAPE 



JSR 
1 

JSR 
1 

BCC 
GEDF 



LOAO/TX/REAO PARITY BIT-1 CHARACTERS 



TRAP 

TRAP 
.WORD 



C*ERROR 

CJESCAPE 
L10021-. 



•PATQ»1,R3 

♦PATQ8.R4 

(R3)* t 2« 

CR4)»,3$ 

R5.WRITEI 

sue 

R5.SERIAL 
. *8. 

sue 

R5.STEPLU 

R5.CHKTS0 

At 

EM48,ERR12 



{SET UP TX CHARACTER POINTER 

{SET UP RX CHARACTER POINTER 

{SET UP NEXT TX CHAR 

{SET UP NEXT RX CHARACTER 

{LOAD ;JEXT TX CHARACTER 

:♦♦ HOLE FOR TX CHARACTER 

j BR IF NO ERROR 

{PRINT STACKED ERROR MESSAGE 

{ANO EXIT SUBTEST 



TRAP 

TRAP 
.WORD 



CJERROR 

CIESCAPE 
L10021-. 



{CLOCK/CHECK PREVIOUS TX CHAR (1 CHAR BUFFER) 



{♦♦ HOLE FOR EXPECTED BIT SEQUENCE 

{BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

{SKIP REMAINDER OF THIS SUBTEST 

TRAP 
.WORD 

{CLOCK PARITY BIT TO TSO 



{CHECK STATE OF PARITY BIT 

{ (SHOULD BE 1) 

{BR IF NO ERROR 

{REPORT "ODD VRC PARITY BIT NOT SET" 

; "DEVICE FATAL" ERROR * 39 



CiERROR 

CJESCAPE 
L10021-. 



CNDMDAO DMV11 LINE UNIT DIAG2 
TEST 1 -- VRC PARITY GENERATION 



MACRO M1200 
TEST 



4322 



4523 
4324 
4325 
4326 
4327 
4326 
4329 
4330 
4331 
4332 
4333 
4334 
4335 
4336 
4337 
4338 

4339 



4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 



4348 



4349 
4350 
4351 
4352 



4353 
4354 
4355 
4356 

4357 



4356 



024562 
024564 
024566 
024570 
024572 
024572 
024574 

024576 
024602 

024604 
024610 

024614 
024620 
024622 

024624 
024630 
024632 
024634 
024636 
024636 
024640 
024640 
024642 

024644 
024650 

024652 
024656 
024660 
024662 

024662 
024664 
024666 
024670 
024672 
024672 
024674 

024676 
024702 
024704 
024704 

024704 



024706 
024706 
024706 
024710 



104455 
00O04 7 
015142 
021714 

104410 
000110 

020327 
001334 

112337 
112437 

0O4537 
120402 
OOCOOO 

004537 
000007 

oooooo 

103003 
104460 

104410 
000042 

004537 
000001 

004537 
OOOOOO 
103006 



104455 
000050 
015175 
021714 

104410 
000010 

020327 
001340 



104403 



003016 



024622 
024632 

003660 



007202 



011540 
007042 



003022 



14$ 



22-FEB-84 15 : 39 
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ESCAPE 


SUB 


4$: 


CMP R3,0PATQ*5 
BNE 1$ 


11$: 


MOVB 
MOVB 


(R3)*,12$ 
CR4)*,13J 


12$: 


JSR 

TDSRL 

000 


R5.WRITEI 


13$: 


JSR 

7 

000 

BCC 

ERROR 


R5. SERIAL 
.+8. 




ESCAPE 


sue 




JSR 

1 


R5.STEPLU 




JSR 


BCC 
GEDF 


R5.CHKTS0 

14$ 

EM49.ERR12 





SEQ 0110 


TRAP 
.WORD 
.WORD 
.WORD 


C$ERDF 
39 

EM48 
ERR12 


TRAP 
.WORD 


CIESCAPE 
L10021-. 



sSKIP REMAINDER OP THIS SUBTEST 



jBR IF TSO-1 CHECKS ARE NOT COMPLETE 

BIT-0 CHARACTERS 

I SET UP NEXT TX CHAR 

I SET UP NEXT RX CHARACTER 

{LOAD NEXT TX CHARACTER 

{♦♦ HOLE FOR TX CHARACTER 

l CLOCK/CHECK PREVIOUS TX CHAR Cl CHAR BUFFER) 



;*+ HOLE FOR EXPECTED BIT SEQUENCE 

;BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

j SKIP REMAINOER OF THIS SUBTEST 

TRAP 
,UORD 



C$ERR0R 

CSESCAP1E 

L10021-. 



iCLOCK PARITY BIT TO TSO 



ESCAPE SUB 



{CHECK STATE OF PARITY BIT 




j (SHOULD BE 0) 




;BR IF NO ERROR 




{REPORT "ODD VRC PARITY BIT NOT CLEARED 


i» 


; "DEVICE FATAL" ERROR * 40 




TRAP 


CIERDF 


.WORD 


40 


.WORD 


EM49 


.WORD 


ERR12 


{SKIP REMAINOER OF SUBTEST 




TRAP 


C$ESCAPE 


.WORD 


L10021-- 



CMP 
BNE 
ENDSUB 



R3.0PATGU9 
11$ 



jBR IF TSO»0 CHECKS ARE NOT COMPLETE 

L 10021: 

TRAP 



C$ESl« 



t SUBTEST *2: EVEN VRC PARITY CHECK 



104402 
004737 



005344 



BGNSUB 

JSR PC.INIDMV 



T1.2: 
lINIT DMV-Ll, ENTER M-LQQP 



TRAP 



C$BSUB 



uc 



CNDMDAO DMVU LINE UNIT DIAG2 MACRO M1200 
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4559 
4360 
4361 
4362 
4363 
4364 

4365 



4366 
4367 
4363 
4369 
4370 
4371 
4372 
4373 
4374 

4375 



4376 
4377 
4378 
4379 
4380 

4381 



4382 
4383 
4384 

4385 
4386 
4387 

4388 



4389 
4390 
4391 
4392 
4393 
4394 
4395 
4396 
4397 
4 398 
4399 

4400 



024714 
024720 
024722 
024724 
024 726 
024 726 
024730 
024730 
024732 

024734 
024740 
024742 
024744 
024 750 
024752 
024754 
024756 
024756 
024760 
024760 
024762 

024764 
024770 
024772 
024774 
024774 
024776 
024776 
025OO0 

025002 
025006 
025010 
025012 
025014 
025014 
025016 
025016 
025020 

025022 
025026 
025032 
025036 

025042 
025O46 

025050 
025052 
025054 
025054 
025056 
025056 
025060 



004537 
042626 
000340 
103003 

104460 

104410 
000320 

004537 
000000 
000000 
004537 
12040? 
OOCOOO 
103003 

104460 

104410 
000270 

004537 
OOOOOO 
103OO3 

104460 

104410 
000252 

004537 
000007 
000151 
103003 

104460 

104410 
000232 

012703 
012704 
112337 

112437 

004537 
120402 
OOOOOO 

103003 

104460 

104410 
000172 



007324 



007734 
003660 



007042 



007202 



003012 
003021 
025050 
025070 

003660 



19 
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JSR R5.INITRN 

DDCMP!EVRC!226 

TXOL 

BCC . *8. 

ERROR 

ESCAPE sue 



SEQ 0111 



It: 



2*i 



I LOAD 1 SOM, CLK TX UNTIL ACTIVE 
iSET DDCMP,EVEN VRC CHECK, SYNCH-226 
tUSE /BIT TX CHARS 
}BR IF NO ERROR 
{REPORT STACKED ERROR 



JSR 


R5,TXCTRL 


000 









JSR 


R5.WRITEI 


TDSRL 




000 




BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 




JSR 


R5.CHKTS0 







BCC 


.♦8. 


ERROR 





{SKIP TO END OF SUBTEST 

*CLEAR tsom 

{LOAD 1ST DATA CHARACTER (000) 



j BR IF NO ERROR 

{PRINT STACKED ERROR MESSAGE 



TRAP 

TRAP 
.WORD 



C*ERROR 

CiESCAPE 
L 10022 -. 



ESCAPE 5U8 





TRAP 


CfERROR 


j AND EXIT SUBTEST 








TRAP 


CIESCAPE 




.WORD 
"SYNCH" 


L10022-. 


;CHtCK 1ST BIT Of EXPECTED 




} CHARACTER (SHOULD BE 0) 






j BR IF NO ERROR 






jREPORT STACKED ERROR 








TRAP 


CiERROR 


lAND EXIT SUBTEST 








TRAP 


CIESCAPE 




.WORD 


L 10022 -. 



JSR 

7. 

151 

BCC 

ERROR 

ESCAPE 



R5, SERIAL 
.♦8. 

SUB 



jREAD REMAINING 7 BITS OF "SYNCH'* CHARACTER 

I (OFF OF TSO BIT) 

I EXPECTED BIT SEQUENCE (001.0H0) 

}BR IF NO ERROR 

{REPORT STACKED ERROR 



jANO EXIT SUBTEST 



MOV 
MOV 
MOVB 
MOVB 

JSR 

TDSRL 

000 

BCC 

ERROR 

ESCAPE 



LOAD/TX/READ PARITY BIT-O CHARACTERS 



TRAP 

TRAP 
.WORD 



CiERROR 

CJESCAPE 
L 10022 -. 



#PATQ*1.R3 

*PATQ6,R4 

(R3)*,2$ 

(R4)*,3f 

R5.WRITEI 

.♦8. 

SUB 



j SET UP TX CHARACTER POINTER 
j SET UP RX CHARACTER POINTER 
jSET UP NEXT TX CHAR 
j SET UP NEXT RX CHARACTER 

jLOAD NEXT TX CHARACTER 

j** HOLE FOR TX CHARACTER 

{BR IF NO ERRCR 

{PRINT STACKED ERROR MESSAGE 

{AND EXIT SUBTEST 



TRAP 

TRAP 
.WORD 



CSERROR 

CIESCAPE 

L 10022 -. 



n 
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4401 
4402 
4403 
4404 
4405 
4406 

4407 



4408 
4409 
4410 
4411 
4412 
4413 
4414 
4413 



4416 



4417 
4418 
4419 
4420 
4421 
4422 
4425 
4424 
4425 
4426 
4427 
4428 

4429 



4450 
4431 
4432 
4433 
4434 
4435 

4436 



4437 
4438 
4439 
4440 
4441 



025062 
025066 
025070 
025072 
025074 
025074 
025076 
025076 
025100 

025102 
025106 

025110 
025114 
025116 
025120 

025120 
025122 
025124 
025126 
025130 
025130 
025132 

025134 
025140 

025142 
025146 

025152 
025156 
025160 
025162 
025164 
025164 
025166 
025166 
025170 

025172 
025176 
025200 
025202 
0252O4 
025204 
025206 
025206 
025210 

025212 
025216 



004537 
000007 
000000 
103003 

104460 

104410 
000152 

004537 
000001 

004537 
000000 
103006 



104455 
0OO051 

015270 
021714 

104410 
000120 

020327 
001334 

112337 
112437 

004537 
120402 
000000 
103003 

104460 

104410 
000062 

004537 
000007 
000000 

103003 

104460 

104410 
000042 

004537 
OOOOOl 



007202 



3$: 



011540 
007042 



003016 



025160 
0252OO 

003660 



007202 



025220 004537 



011540 
007042 



JSR 

7 

000 


R5. SERIAL 


iCLOCK/CHECK PREVIOUS TX CHAR (1 CHAR 


BUFFER) 




j** HOLE FOR EXPECTED BIT SEQUENCE 




BCC 


. »8. 


iBR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


CJERROR 


ESCAPE 


sut; 


{SKIP REMAINDER OF THIS SUBTEST 








TRAP 


CJESCAPE 






.WORD 


L 10022 -. 


JSR 

1 


R5.STEPLU 


{CLOCK PARITY BIT TO TSO 




JSR 


R5.CHKTS0 


{CHECK STATE OF PARITY BIT 









{ (SHOULD BE 0) 




BCC 


4$ 


;BR IF NO ERROR 




GEDF 


EM51.ERR12 


{REPORT "EVEN VRC PARITY NOT CLEARED" 





"DEVICE FATAL" ERROR 



41 
TRAP 
.WORD 
.WORD 
.WORD 





ESCAPE 


SUB 


4$: 

11$: 


CMP R3,*PATQ*5 
BNE 11 

• LOAD/TX/READ PARITY 

MOVB CR3)*,12$ 
MOVB (R4)*,13$ 


12$: 


JSR 

TDSRL 

000 

BCC 

ERROR 


R5.WRITEI 




ESCAPE 


SUB 


13$: 


JSR 

7 

000 

BCC 

ERROR 


R5, SERIAL 
.♦8. 




ESCAPE 


SUB 




JSR 

1 


R5.5TEPLU 




JSR 


R5.CHKTS0 



i SKIP REMAINDER OF THIS SUBTEST 



TRAP 
.WORD 



C$ERDF 
41 

EM51 
Ef*R12 

C$ESCAPE 
L1002,>-. 



{BR IF TSO-0 CHECKS ARE NOT COMPLETE 

BIT-1 CHARACTERS 

{SET UP NEXT TX CHAR 
{SET UP NEXT RX CHARACTER 

{LOAD NEXT TX CHARACTER 

{*♦ HOLE FOR TX CHARACTER 

, BR IF NO ERROR 

, PRINT STACKED ERROR MESSAGE 



TRAP 
{ANO EXIT SUBTEST 

TRAP 

.WORD 


ClfcRROH 

C$ESCAPE 

L 10022- , 


iCLOCK/CHECK PREVIOUS TX CHAR (1 CHAR 


BUFFER) 


;±* HOLE FOR EXPECTED BIT SEQUENCE 
jBR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

j SKIP REMAINDER OF THIS SUBTEST 

TRAP 
. WORD 


C$ERRO« 

C$ ESCAPE 
L 10022 -. 



jCLOCK PARIT> BIT TO TSO 



{CHECK STATE UF PARITY BIT 



SEQ 0112 



M ) 
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4442 


025224 


000001 


444 3 


025226 


103006 


4444 


025230 






025230 


104455 




025232 


000052 




025234 


015234 




025236 


021714 


4445 


025240 






025240 


104410 




025242 


OOOOIO 


4446 






444 7 


025244 


020327 


4446 


025250 


001334 


4449 


025252 
025252 






025252 


104403 


4450 


025254 
025254 






025254 


104401 



003022 



I 

BCC 

GEDF 



14 1 



ENOTST 



CMP 
BNE 
ENDSUB 



14$ 
EM50.ERR12 



ESCAPE sue 



R3,*PATQ*9. 
11$ 



; (SHOULD BE 1) 

{BR ir NO ERROR 

(REPORT "EVEN VRC PARITY NOT SET" 

; "DEVICE FATAL" ERROR 4? 

TRAP 
. V'ORD 
.WORD 
.WORD 



{SKIP REMAINDER OF SUBTEST 



TRAP 
.WORD 



jBR IF TSO-1 CHECKS ARE NOT COMPLETE 

L10022: 



L 10020 j 



TRAP 



TRAP 



CJERDf 
42 

EM50 
ERR12 

CiESCAPE 
L 10022 -. 



CiESUB 



CiETST 



SEQ 0113 



KM 
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SEQ 0114 



44/3 
4474 
4475 
4476 



4477 
4478 
4479 
4480 
4481 
4482 

4483 



4484 
4485 
4486 
4487 
44W 
4489 
4490 
4491 
4492 
4493 
4494 
4495 



025256 



025256 
025256 
025256 
025260 
025264 
025270 
025272 
025274 
025276 
025276 
0253O0 
025300 
025302 

025304 
025310 

025312 
025314 
025320 
025322 
025324 
025330 
025332 
025334 
025340 



104402 
0O4737 
0O4537 
042226 
000347 
103003 

104460 

104410 
000256 

004537 
000001 

0O0007 
004537 
000001 
000010 
004537 
OOOOOO 
OOOOOO 
004537 
000043 



005344 
007324 



007734 
007734 
007734 
007622 



; ♦♦ 

;* 

$ + 

;* 

s* 
{ * 

}* 

;* 

;♦ 
;* 
;* 
;* 
;* 
}* 
;* 
{♦ 
;* 
j* 
; + 
i* 
; + 
i -- 

5 



TEST 2 -- VRC ERROR DETECTION TEST 

SUBTEST 1 - FORCING OF RERR USING ODD VRC 

THE USYRT IS PLACED IN CHAR MODE WITH ODD VRC AND BOTH TX ANO RX CHAR 
LENGTH-7 BITS. THE RECEIVER ANO TRANSMITTER ARE THEN SYNC'D. WHEN THE FIRST 
DATA CHARACTER IS LOADED INTO TXDB, THE RX CHAR LENGTH IS CHANGED TO 6 BITS 
TWO 7 BIT CHARACTERS (^PARITY) ARE THEN TRANSMITTED, RESULTING IN A 16 BIT 
STREAM WHICH THE RECEIVER WILL READ AS TWO 6 BIT CHARS ( ^PARITY ♦ 2 LEFT). 
THE FIRST "CHARACTER" READ WILL HAVE THE CORRECT PARITY; THE SECOND WILL 
NOT. 

SUBTEST 2 - FORCING OF RERR USING EVEN VRC 

THE USYRT IS PLACEO IN CHAR MOOE WITH EVEN VRC ANO BOTH TX ANO RX CHAR 
LENGTH-7 BITS, THE RECEIVER ANO TRANSMITTER ARE THEN SYNC'D. WHEN THE FIRST 
DATA CHARACTER IS LOADED INTO TX06, THE RX CHAR LENGTH IS CHANGED TO 6 BITS 
TWO 7 BIT CHARACTERS OPARITY) ARE THEN TRANSMITTED, RESULTING IN A 16 BI1 
STREAM WHICH THE RECEIVER WILL READ AS TWO 6 BIT CHARS ( ♦PARITY * 2 LEFT). 
THE FIRST "CHARACTER" READ WILL HAVE THE CORRECT PARITY j THE SECOND WILL 
NOT. 

**************************************** ** *************************** ****** 



BGNTST 



T2 



I SUBTEST 01; FORCING OOD VRC ERROR 



BGNSU8 



JSR 


PCINIDMV 


JSR 


R5.INITRN 


DDCMP!! 


DVRC!226 


TXDLIRXDL 


BCC 


.♦8. 


ERROR 




ESCAPE 


sue 


JSR 


R5.TXCTRL 


TSOM 
7. 

JSR 




R5.TXCTRL 


TSOM 




8. 




JSR 


R5.TXCTRL 


000 









JSR 


R5.TXCHAR 


04 3 





T2.1; 

TRAP 
jINIT DMV-11, ENTER M-LOOP 
jLOAD 1 SOM, CLK TX UNTIL ACTIVE 
j SET DDCMP, OOD VRC CHECK . SYNCH-226 
iTX/RX CHAR LENGTH-7 BITS 
j BR IF NO ERROR 
jREPORT STACKED ERROR 

TRAP 
jSKIP TO ENO OF TEST 

TRAP 

.WORD 

{SET TSOM 



j SET TSOM AGAIN (KNOCK DOWN TBMT ) 



C53SUB 



CiERROR 

CIESCAPE 
L 10024 ~. 



j CLEAR TSOM 



iLOAO 043. TX 3RD SYNCH 



CNDMOAO DMV11 LINE UNIT DIAG2 MACRO M1200 
TEST 2 -- VRC ERROR DETECTION TEST 



I. 9 
22 -FEB -84 15:39 PAGE 65-1 



4496 


025342 


OOOOIO 


4497 


025344 


103003 


4496 


025346 






025346 


104460 


4499 


025350 






025350 


104410 




025352 


000206 


4500 






4501 


025354 


004537 


4502 


025360 


120407 


4503 


025362 


000346 


4I>04 


025364 


103003 


4505 


025366 






025366 


104460 


4506 


025370 






025370 


104410 




025372 


0OC166 


4507 






4508 


025374 


004537 


4509 


025400 


000036 


4510 


025402 


000010 


*5U 


025404 


103003 


4512 


025406 






025406 


104460 


4513 


025410 






025410 


104410 




025412 


0O0146 


4514 






4515 


025414 


004537 


4516 


025420 


000000 


4517 


025122 


OOOOIO 


4518 


025424 


103003 


4519 


">25426 






0^5426 


104460 


4520 


025430 






025430 


104410 




025432 


0O0126 


4521 






4522 


025434 


0O4537 


4523 


025440 


OOOOOO 


4524 


025442 


OOOOIO 


4525 


025444 


103003 


4526 


025446 






025446 


104460 


4527 


025450 






025450 


1O4410 




025452 


000106 


4528 






4529 


025454 


0O4537 


4530 


025460 


000026 


4531 


025462 


OOOOOl 


4532 


025464 


1OO0OO 


4533 


025466 


103003 


4534 


025470 






0254 70 


104460 


4535 


025472 






025472 


104410 



003660 



007622 



007622 



007622 



010034 



8. 

BCC 

ERROR 

ESCAPE 


.♦8. 
SUB 


;BR IF NO ERROR 
iREPORT STACKED ERROR 

(SKIP TO END OF TEST 




TRAP 

TRAP 
.WORD 


C 5 ERROR 

CIESCAPE 
L10024-. 


JSR 

PCR 

TX0LI6 

BCC 

ERROR 

ESCAPE 


R5.WRITEI 
.►6. 

SUB 


;SET RX CHAR LFNGTH-6 BITS 

jTXCL-7, RXCL-6 
j BR IF NO ERROR 
{PRINT STACKED ERROR MESSAGE 

{AND EXIT SUBTEST 


TRAP 

TRAP 
.WORD 


CIERROR 

CIESCAPE 
L 10024 -. 


JSR 
036 
8. 


R5.TXCHAR 


{LOAD 036 








BCC 
ERROR 

ESCAPE 


.♦8. 
SUB 


;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 




TRAP 

TRAP 
.WORD 


CIERROR 

CIESCAPE 
L 10024 -. 


JSR 
000 
8. 


R5.TXCHAR 


{LOAD FILLER (000) 








BCC 

ERROR 

ESCAPE 


.♦8, 

sue 


j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 




TRAP 

TRAP 
.WORD 


CIERROR 

CIESCAPE 
L10024-, 


JSR 
000 
8. 


R5.TXCHAR 


{LOAD FILLER (000) 








BCC 
ERROR 

ESCAPE 


.♦8. 

SUB 


{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 




TRAP 

TRAP 
.WORD 


CIERROR 

CiESCAPE 
L10024-. 


JSR 

026 

RERCHK 

NOCRDA 

BCC 

ERROR 

ESCAPE 


R5.RXCHAR 

. *8. 
SUU 


tREAD/CHK SYNCH CHARACTER 

(CHECK RERR (NO VRC ERROR EXPECTED) 
(NO INITIAL CHECK OF ROA-0 
j BR if NO ERROR 
{REPORT STACKED ERROR 

TRAP 
j SKIP TO END OF TEST 

TRAP 


CIERROR 

CIESCAPE 



SEQ 0U5 



M9 
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025474 000064 



.WORD 



SEQ 0116 



L 10024 -. 



4536 














4537 025476 


004537 


010034 


JSR 


R5.RXCHAR 


iREAD/CHK 6 BIT CHARACTER 




4538 025502 


000043 




043 




lEXPECTED 1ST "CHARACTER" (043) 




4539 025504 


000001 




RERCHK 




j CHECK RERR CNO VRC ERROR EXPECTED) 




4540 025506 


100000 




NOCRDA 




{DON'T CHECK INITIAL RDA»0 




4541 025510 


103003 




BCC 


. *8. 


;BR IF NO ERROR 




4542 025512 






ERROR 




j REPORT STACKED ERROR 




025512 


104460 








TRAP 


CIERROR 


4543 025514 






ESCAPE 


SUB 


{SKIP TO END OF TEST 




025514 


104410 








TRAP 


C*ESCAPE 


025516 


000042 








.WORD 


L10024-. 


4544 














4545 025520 


004537 


010034 


JSR 


R5.RXCHAR 


jREAD/CHK 6 BIT CHARACTER 




4546 025524 


100074 




RXERRJ074 


{EXPECTED 2N0 "CHARACTER" (074) 




4547 025526 


OOOOOl 




RERCHK 




j CHECK RER^ (VRC ERROR IS EXPECTED) 




4548 025530 


10C000 




NOCRDA 


jDON'T 


CHECK INITIAL RDA-0 




4549 025532 


103003 




BCC 


.♦8. 


j BR IF NO ERROR 




4550 025534 






ERROR 




{REPORT STACKED ERROR 




025534 


104460 








TRAP 


CJERROR 


4551 025536 






ESCAPE 


SUB 


{SKIP TO END OF TEST 




025536 


104410 








TRAP 


CIESCAPF. 


025540 


000020 








.WORD 


L10024-. 


4552 














4553 025542 


0O4537 


011456 


JSR 


R5.ENDTRN 


{SHUT DOWN TRANSMITTER, RECEIVER 




4554 025546 


000011 




9. 








4555 025550 


103003 




BCC 


.♦8. 


{SR IF NO ERROR 




4556 025552 






ERROR 




{REPORT STACKED ERROR 




025552 


104460 








TRAP 


C TERROR 


4557 025554 






ESCAPE 


SUB 


{SKIP TO NEXT SUBTEST 




025554 


104410 








TRAP 


CfESCAPE 


025556 


000002 








.WORD 


L 10024 -. 


4558 025560 






ENDSUB 








025560 










L 10024: 




023560 


104403 








TRAP 


C$tSUB 


4559 














4560 






; SUBTEST 02: FORCING EVEN VRC 


ERROR 




4561 














4562 025562 






BGNSUB 








025562 










T2.2: 




025562 


104402 








TRAP 


C$BSU6 


4563 025564 


004737 


005344 


JSR 


PC.INIDMV 


ilNIT DMV-11, ENTER MLOOP 




4564 025570 


004537 


007324 


JSR 


R5.INITRN 


{LOAD 1 SOM. CLK TX UNTIL ACTIVE 




4565 025574 


042S26 




DDCMPJEVRC5226 


{SET DDCMf\EVEN VRC CHECK, SYNCH-226 




4566 025576 


000347 




TXDURXDL 


{TX/RX CHAR LENGTH-7 BITS 




4567 025600 


103003 




BCC 


.♦8. 


j BR IF NO ERROR 




4568 025602 






ERROR 




{REPORT STACKED ERROR 




025602 


104460 








TRAP 


C TERROR 


4569 025604 






ESCAPE 


SUB 


{SKIP TO END OF TEST 




025604 


104410 








TRAP 


CiESCAPE 


025606 


000256 








.WORD 


L10025-. 


4570 














4571 025610 


004537 


007734 


JSR 


R5.TXCTRL 


{SET TSOM 




4572 025614 


OOOOOl 




TSOM 








4573 025616 


000007 




7. 








4574 025620 


004537 


007734 


JSR 


R5.TXCTRL 


{SET TSUM AGAIN (KNOCK DOWN TBMT) 




4575 025624 


OOOOOl 




TSOM 
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4576 
4577 
4578 
4579 
4580 
4581 
4582 
4583 
4584 

4585 



4586 
4587 
4588 
4589 
4590 
4591 

4592 



4593 
4594 
4595 
4596 
4597 
4598 

4599 



4600 
4601 
4602 
4603 
4604 
4605 

4606 



4607 
4608 

4609 
'hlO 

'lull 
4612 

4613 



4614 
4615 
4616 
4617 



025626 
025630 
025634 
025636 
025640 
025644 
025646 
025650 
025652 
025652 
025654 
025654 
025656 

025660 
025664 
025666 
025670 
025672 
025672 
025674 
025674 
025676 

025700 
025704 
025706 
025710 
025712 
025712 
025714 
025714 
025716 

025720 
025724 
025726 
025730 
025732 
025732 
025754 
025734 
025736 

025/40 
025/44 
025746 
G25750 
025752 
025752 
025754 
025754 
025756 

025760 
025764 
025766 



000010 
004537 
000000 
000000 
004537 
000143 
000010 
103003 

104460 

104410 
000206 

004537 
120407 
000346 
103003 

104460 

104410 
000166 

0C4537 
000026 
OOOOIO 
103003 

104460 

104410 
000146 

004537 
000000 
OOOOIO 
103003 

104460 

104410 
000126 

0O4537 

000000 
OOOOIO 
103003 

104460 

104410 
000106 

004537 
000026 
000001 



007734 
007622 



003660 



007622 



007622 



007622 



010034 





N9 
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0. 

JSR 

000 



JSR 

143 

8. 

BCC 

ERROR 


R5.TXCTRL 
R5.TXCHAR 
.+8, 


ESCAPE 


SUB 


JSR 
PCR 
TX0LJ6 

BCC 
ERROR 


R5,WRITEI 
.+8. 


ESCAPE 


SUB 


JSR 

026 

8. 

BCC 

ERROR 


R5,TXCHAR 
.♦8. 


ESCAPE 


SUB 


JSR 

000 

8. 

BCC 

ERROR 


R5.TXCHAR 


ESCAPE 


SUB 


JSR 

000 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


SUB 


JSR 
026 
RERCHK 


P5.RXCHAR 



SEQ 0117 



j CLEAR TSOM 



{LOAD 143, fX 3RD SYNCH 



{BR IF NO ERROR 

i REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{SET RX CHAR LENGTH-6 BITS 

jTXCL-7, RXCL-6 
j BR IF NO ERROR 
{PRINT STACKED ERROR MESSAGE 

{AND EXIT SUBTEST 



{LOAD 026 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD FILLER COOO) 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD FILLER (000) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 

.WORD 



TRAP 

TRAP 
.WORD 



C* ERROR 

CtESCAPE 
L10025-. 



C5ERR0R 

CJESCAPE 
L10025-. 



C $ ERROR 

CIESCAFE 
L10025-. 



CIERROR 

CiE SCAPE 
L 10025 -. 



CiERROR 

C$F.SCAPE 
L10025-, 



iRFAD/CHK SYNCH CHARACTER 
I 

{CHECK RERR CNO VRC ERROR EXPECTED) 
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4618 


025770 


JOOOOO 


4619 


025772 


103003 


4620 


025774 






025774 


104460 


4621 


025776 






025776 


104410 




026000 


000064 


4622 






4623 


026002 


004537 010034 


4624 


026006 


000045 


4625 


C26010 


000001 


4626 


026012 


100000 


4627 


026014 


103003 


4628 


026016 






026016 


104460 


4629 


026020 






026020 


104410 




026022 


000042 


4650 






4651 


026024 


ixmSw 0LUU?>4 


4652 


026050 


100054 


4655 


026052 


000001 


4654 


026054 


100000 


4655 


026056 


105003 


4656 


026040 






026040 


104460 


4657 


026042 






026042 


104410 




026044 


000020 


4655 






4659 


026046 


004537 011456 


4640 


026O52 


000011 


4641 


026054 


105005 


4642 


026056 






C26056 


104460 


4643 


026060 






026060 


104410 




026062 


000002 


4644 


026064 
026064 






026064 


104405 


4645 


026066 
026066 






026066 


104401 



B 1 
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ENOTST 



NOCRDA 

BCC 

ERROR 


. •e. 


ESCAPE 


sue 


JSR 

043 

RERCMK 

NOCROA 

BCC 

ERROR 


R5.RXCHAR 
.♦8. 


ESCAPE 


SLB 


JSR R5.RXCHAR 

RXERRJ0S4 

RERCMK 

NOCROA iDON'T 

BCC . ♦«. 

ERROR 


ESCAPE 


sue 


JSR 
9. 
BCC 
ERROR 


R5.ENDTRN 


ESCAPE 


sue 



EN0SU8 



I NO INITIAL CHECK Of ROA-0 
i BR IF NU ERROR 
tREPORT STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



jREAO/CHK 6 BIT CHARACTER 

lEXPECTED 1ST "CHARACTER" (045) 

, CHECK RERR (NO VRC ERROR EXPECTED) 

iDON'T CHECK INITIAL HDA-0 

jBR IF NO ERROR 

iREPORT STACKED ERROR 



I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



iREAO/CHK 6 BIT CHARACTER 
lEXPECTED 2ND "CHARACTER" (054) 
t CHECK RERR (VRC ERROR IS EXPECTED) 
CHECK INITIAL RDA-0 
i BR IF NO ERROR 
I REPORT STACKED ERROR 

TRAP 
iSKIP TO END OF TEST 

TRAP 
.WORD 

j SHUT DOWN TRANSMITTER, RECEIVER 

»BR IF NO ERROR 
iREPORT STACKED ERROR 

iSKIP TO N£XT SU©T£ST 



C TERROR 

CIESCAPE 
L 10025 -. 



CIERROR 

CIESCAPE 
L 10025 -. 



CIERROR 

CIESCAPE 

L10025*. 



TRAP 


CIERROR 


TRAP 
.WORD 


CIESCAPE 
L10025-. 


L 10025: 

TRAP 


CIESUB 


I 100231 

TRAP 


CIETST 



SEQ 0118 



CNOMOAO 
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465b 
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SEQ 0119 



4657 
4656 
4659 
4660 



4661 
4662 
4665 
4664 
4665 
4666 

4667 



4663 
4669 

4670 
4671 
A6?<> 
46^3 
4674 
4675 
4676 
4677 
4676 
4679 
4660 
4661 
4662 
4663 
4664 
4665 

4686 



4607 



026070 



026070 
026070 
026070 
026072 
026076 
026102 
026104 
026106 
026110 
026110 
026112 
026112 
026114 

026116 
026122 
026124 
026126 
026132 
026154 



026136 
026142 

026146 
026152 
026154 
026156 
026160 
026160 
026162 
026162 



104402 
004737 
0O4537 
065626 
000000 
103003 

104460 

104410 
0OO544 

004537 
000001 
000007 
004537 
OOOOOO 
000000 



012703 
112337 

004537 
OOOOOO 
000010 
103003 

104460 

104410 



005344 
007324 



007734 
007734 



026662 
026152 

007622 



TEST 3 -- BCP CRC GENERATION/DETECTION TEST 

TEST 3 -- BCP CRC GENERAT ION/DE TFCTION TFST 

THIS TEST IS COMPOSED Of' 2 SUBTESTS -- tl EXPECTS GOOO CRC 

GENERATION ANO REPORT ERRORS -~ *2 FORCES AN ERROR AND ONLY 

REPORT WHEN THE CRC IS ACCEPTED AS GOOO. EACH IS 

RUN AT THE CHARACTER LENGTHS Of 3 BITS FCfl THE ENTIRITY 

OF EACH MESSAGE. BOTH THE TRANSMITTER ANO RECEIVER WILL BE SET TO 

THE SAME CHARACTER LENGTH. ERROR LOOPING WILL BE ON THE FAILING 

SUBTEST. TEXT STRINGS WILL BE LIMITED TO 5 CHARACTERS. 

--it************************************************************************* 

BGNTST 

T3i; 

SL6TEST *1 : GOOO CRC-16 GENERATION 

BGNSUB 

T3.1: 

TRAP C*BS^ 
JSR PC.INIDMV iINIT DMV-11, ENTER M-LOOP 
JSR R5.INITRN ,L0AO 1 SOU, CLK TX UNTIL ACTIVE 
DOCMP! STRIPS} IDLES ICRC16! SYNCH iSET OOCMP , STRIP. IDLE .CRC - 16 , SYNCH-226 


BCC ,*6. 
ERROR 

ESCAPE TST 



lUSE 6 BIT CHARS 






i BR IF NO ERROR 






, REPORT STACKED ERROR 








TRAP 


CIERROR 


;SKIP TO ENO OF TEST 








TRAP 


CfESCAPE 




.WORD 


L 10026 -, 



jSR 

iSOH 

7. 

JSR 

000 





R5.TXCTRL 
R5.TX.CTRL 



jSET TSOM, TX 1ST SYNCH 
, CLEAR TSCM 



i 



, NOW TRANSMIT THE FIVE 6-BIT DATA CHARACTERS TO THE RECEIVER/FIFO 



J -■ 
10* 



MOV *T01TBL.R3 
MOVB CR3)».l* 



R5.TXCHAR 
ESCAPE TST 



JSR 

000 

6. 

BCC 

ERROR 



I SET UP DATA TABLE POINTER 
i INSTALL NEXT TX CHARACTER 

i TRANSMIT CHARACTER ( ••> RX/FXFO ) 
l** HOLE FOR NEXT CHARACTER ** 



I BR IF NO ERROR 

j REPORT STACKED ERROR 

l SKIP TO ENO OF TEST 



026164 000474 



TRAP 

TRAP 

.WORD 



CiERROR 

CtESCAPE 
L 10026 -. 



D.1.0 
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SEQ 0120 



4688 
4689 
4690 
4691 
4692 
4693 
4694 
4695 
46% 
4697 
4698 
4699 
4 700 
4701 
4 702 
4703 
4 704 
4705 

4706 



4 70V 
4708 
4709 

4710 
4711 
4712 
4713 

4714 



4715 
4716 
4717 
4 718 
4719 
4720 
4721 

4722 



4723 
472* 
4725 
4726 
4 727 
4 728 
4729 

4730 



4731 
4732 



026166 
026172 

026174 
026200 
026202 
026204 
026210 
026212 
026214 
026220 

026222 
026226 
C26230 
026232 
026234 
026236 
026236 
026240 
026240 
026242 

026244 
026250 
026252 
026254 
026256 
026260 
026260 
026262 
026262 
026264 

026266 
026272 
026274 
026276 
026300 
026302 
026302 
026304 
026304 
026306 

026310 
026314 
026316 
026320 
026322 
026324 
026324 
026326 
026326 
026330 



022703 
001363 

004537 
000002 
000010 
004537 
000002 
OOOOIO 
004537 
000016 

004537 
000000 
000000 
100000 
103003 

104460 

104410 
00O416 

004537 
000125 
000000 
100000 
103003 

104460 

104410 
000374 

004537 
000252 
000000 
10O0O0 
103003 

104460 

104410 
0O0352 

004537 
000377 
OOOOOO 
100010 
103003 

104460 

104410 
000330 



026667 
007734 
007734 
011540 
010034 



010034 



010034 



010034 



026332 004537 010034 



CMP 


*T01TBL»5,R3 


BNE 


10$ 


JSR 


R5.TXCTRL 


TEOM 




8. 




JSR 


R5.TXCTRL 


TEOM 




8. 




JSR 


RS.Si'EPLU 


14. 




JSR 


R5,RXCHAR 


000 









NOCRDA 




BCC 


.♦8. 


ERROR 




ESCAPE 


TST 


JSR 


R5,RXCHAR 


125 









NOCRDA 




BCC 


,♦8. 


ERROR 




ESCAPE 


TST 


JSR 


R5.RXCHAR 


252 









NOCRDA 




BCC 


.♦8. 


ERROR 




ESCAPE 


TST 


JSR 


R5,RXCHAR 


377 









NOCRDA! 


8. 


BCC 


.♦8. 


ERROR 




ESCAPE 


TST 


JSR 


R5.RXCHAR 



jAl.L CHARACTERS TRANSMIT TED ? 
i IF NOT, TX ANOTHER ONF 



j LOAD 1ST TEOM 



j LOAD 2ND TEOM 



,READ 6 CHK 000. RCV 125 



j NO INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
tREPORT STACKED ERROR 

j SKIP TO END OF TEST 



I READ 6 CHK 125, RCV 252 



»N0 INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
iREPORT STACKED ERROR 

i SKIP TO ENO OF TEST 



tREAD 6 CHK 252, RCV 377 



l NO INITIAL CHECK Of ROA-0 

i BR IF NO ERROR 

i REPORT STACKED ERROR 

j SKIP TO END OF TEST 



I READ £ CHK 377, RCV 000 



I NO INITIAL CHECK OF RDA-0 
i BR IF NO ERROR 
jREPORT STACKED ERROR 

I SKIP TO END OF TEST 



i READ 6 CHK 000. CHECK CRC : 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 

,WORD 



TRAP 

TRAP 
.WORD 



CiERROR 

CIESCAPE 
L 10026 -. 



CIERROR 

CIESCAPE 
L 10026 -, 



CIERROR 

CIESCAPE 
L 10026 -. 



CIERROR 

CIESCAPE 
L 10026 «. 



CNDMDAO 

TEST 3 

4733 
4734 
4735 
4736 
4737 

4738 



4739 
4740 
4741 
4742 
4743 

4744 



4745 



4746 
4747 
4748 
4749 



4750 
4751 
4752 
4753 
4754 
4755 

4756 



4757 
4758 
4759 
4 760 
4761 
4762 
4 763 
4764 
4765 
4766 
4767 
4768 
4769 
4770 
4771 
4772 
4773 
4774 
4775 
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026336 
026340 
026342 
026344 
026346 
026346 
026350 
026350 
026352 

026354 
026360 
026362 
026364 
026364 
026366 
026366 
026370 
026372 
026372 
026372 



026374 
026374 
026374 
026376 
026402 
026406 
026410 
026412 
026414 
026414 
026416 
026416 
026420 

026422 
026426 
026430 
026432 
026436 
026440 



026442 
026446 

026452 
026456 
026460 
026462 
026464 
026464 



100000 
000001 
100000 
103003 

104460 

104410 
000306 

004537 
000011 
103003 

104460 

104410 
000270 



104403 



104402 
004737 
004537 
065626 
000000 
103003 

104460 

104410 
000240 

004537 
000001 
000007 
004537 
000000 
000000 



012703 
112337 

004537 
000000 
000010 
103003 

104460 



011456 



005344 
007324 



007734 



007734 



RXERR'000 

RERCHK 

NOCRDA 

BCC 

ERROR 



ESCAPE 



JSR 

9. 

BCC 

ERROR 



,♦8, 

TST 



5 RERR-1 (IF CRC -16 WAS OK), 

jNO INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CIERKOR 

CJESCAPE 
L 10026 -. 



R5.ENDTRN 
.♦8. 



ESCAPE TST 



{SHUT DOWN TRANSMITTER, RECEIVER 

j BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



ENDSUB 



TRAP 

TRAP 
.WORD 



L 10027: 



TRAP 



CiERROR 

CIESCAPE 
L 10026 -. 



C*ESUB 



SUBTEST *2 : BAD CRC-16 GENERATION 
BGNSUB 



T3.2: 

TRAP C$BSUB 
JSR PC,INIDMV jINIT DMV-11. ENTER M-LOOP 
JSR R5.INITRN {LOAD 1 SOM. CLK TX UNTIL ACTIVE 
DDCMP 'STRIPS! IDLES ICRC16! SYNCH iSET DOCMP, STRIP , IDLE, CRC-16, SYNCH-226 




BCC 

ERROR 

ESCAPE 



JSR 

TSOM 

7. 

JSR 

000 





,*8, 

TST 

R5.TXCTRL 
R5.TXCTRL 



> USE 8 BIT CHARS 
I BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO ENO OF TEST 



;SET TSOM, TX 1ST SYNCH 
I CLEAR TSOM 



TRAP 

TRAP 
.WORD 



CIERROR 

CSESCAPE 
L 10026 -. 



j NOW TRANSMIT THE FIVE 8-BIT DATA CHARACTERS PLUS THE ADDITIONAL 
; TWO BAD CRC CALL l'S) CHARACTERS TO THE RECEIVER/FIFO 



026662 
026456 

007622 



J ■■ 

10$ 

li: 



MOV 
MOVB 

JSR 

000 

8. 

BCC 

ERROR 



0T01TBL.R3 
(R3)*,l$ 

R5.TXCHAR 
.♦8. 



{ SET UP DATA TABLE POINTER 
{INSTALL NEXT TX CHARACTER 

{TRANSMIT CHARACTER C •-> RX/FIFO ) 
j** HOLE FOR NEXT CHARACTER ** 



I BR IF NO ERROR 
{REPORT STACKED ERROR 



SEQ 0121 



TRAP 



CSERROR 
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4776 



4777 
4 778 
4779 
4780 
4 781 
4782 
4783 
*784 
4785 
4786 
4787 
4788 
4789 

4790 



4791 
4792 
4793 
4794 
4795 
4796 
4797 

4798 



4799 
4800 

4eoi 

4802 
4803 
4804 
4805 

4806 



4807 
4803 
4809 
4810 
4811 
4812 
4813 

4814 



4815 
4816 
4817 
4818 



026466 
026466 
026470 

0264 72 
026476 

026500 
026504 

026506 
026512 
026514 
026516 
026520 
026522 
026522 
026524 
026524 
026526 

026530 
026534 
026536 
026540 
026542 
026544 
026544 
026546 
026546 
026550 

026552 
026556 
026560 
026562 
026564 
026566 
026566 
026570 
026570 
026572 

026574 
026600 
026602 
0266O4 
026606 
026610 
026610 
026612 
025612 
026614 

026616 
026622 

026624 



104410 
000170 

022703 
001363 

004537 
000010 

004537 
000000 
000000 

iooooo 

103003 

104460 

104410 
000132 

004537 
000125 
000000 
IOOOOO 
103003 

104460 

104410 
000110 

004537 
000252 
000000 
100010 
103003 

104460 

104410 
000066 

004537 
000377 
OOOOOO 

100010 
103003 

104460 

104410 
000044 

004537 
OOOOOO 
000001 



026671 
011540 
010034 



UE3IX 



010034 



010034 



010034 



010034 



E5CAPE 


TST 


CMP 
BNE 


*T01TBL*7,R3 
10* 


a a a a » « a 


aBuaasXBxxssa 


JSR 
10 


R5.STEPLU 


JSR 

000 



NOCRDA 

BCC 

ERROR 


R5.RXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

125 



NOCRDA 

BCC 

ERROR 


R5,RXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 
252 


NOCRDA* 

BCC 

ERROR 


R5.RXCHAR 

8. 
.*8. 


ESCAPE 


TST 


JSR 

377 



NOCRDA ! 

BCC 

ERROR 


R5,RXCHAR 

8. 
.♦8. 


ESCAPE 


TST 


JSR 
000 
RERCHK 


R5.RXCHAR 



{SKIP TO END Of TEST 



TRAP 
.WORD 



j ALL CHARACTERS TRANSMITTED ? 
i IF NOT, TX ANOTHER ONE 

as*. aaaa«Ka^ aaaM-aaaaaaaaaaaaaxaiiaCTaax 



j READ 6 CHK 000, RCV 125 



j NO INITIAL CHECK OF RDA-0 
I BR IF NO ERROR 
jREPORT STACKED ERROR 



{SKIP TO END OF TEST 



,READ 6 CHK 125, RCV 252 



{NO INITIAL CHECK OF ROA-0 
;BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{READ 6 CHK 252, RCV 377 



{NO INITIAL CHECK OF RDA-0 
{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OT TEST 



{READ 6 CHK 377, RCV 000 



iNO INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
(REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 



TRAP 
.WORD 



C (ESCAPE 
L 10026 -. 



C*ERROR 

CfESCAPE 
L 10026 -, 



CI ERROR 

CfESCAPE 
L10026-. 



C*ERROR 

CJESCAPE 
L10026-. 



C TERROR 

CiESCAPE 
L 10026 -. 



SEQ 0122 



iREAD & CHK 000, CHECK CRC : 

{ RERR-0 IF BAD CRC-16 (EXPECTED). 
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4819 


026626 


100000 


4820 


026630 


103003 


4821 


026632 






026632 


104460 


4822 


026634 






026634 


104410 




026636 


000022 


4823 






4824 


026640 


004537 011456 


4825 


026644 


000011 


4826 


026646 


103003 


4827 


026650 






026650 


104460 


4828 


026652 






026652 


104410 




026654 


000004 


4829 


026656 
026656 






026656 


104403 


4830 


026660 
026660 






026660 


104401 


4831 






4832 


026662 


000 


4833 


026663 


125 


4834 


026664 


252 


4635 


026665 


377 


4836 


026666 


000 


4837 


026667 


377 


4838 


026670 


377 


4839 






4840 







NOCRDA 

BCC 

ERROR 



. *8. 



ENDSU6 



ENOTST 



*N0 INITIAL CHECK OF RDA"0 

}BR IF NO ERROR 

j REPORT STACKED ERROR 



01TBL: .BYTE 


000 


jDl 


.BYTE 


125 


;D2 


.BYTE 


252 


jD3 


.BYTE 


377 


;D4 


.BYTE 


000 


1 05 


.BYTE 


377 


j BAD CRC1 


.BYTE 


377 


j BAD CRC2 


.EVEN 







SEQ 0125 



ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 

TRAP 
.WORD 


CiERROR 

CSESCAPE 
L10026-. 


JSR 
9. 
BCC 
ERROR 

ESCAPE 

1 


R5.ENDTRN 


;SHUT DOWN TRANSMITTER, 


RECEIVER 




.♦8. 
TST 


iBR IF NO ERNOR 

{REPORT STACKED ERROR 

I SKIP TO END OF TEST 


TRAP 

TRAP 
.WORD 


CtERROR 

CJESCAPE 
L 10026 -. 


1 






L10030: 

TRAP 


CiESUB 








L1C026: 

TRAP 


C*ETST 



CNDMOAO 
TEST 4 
4859 



DMV11 LINE UNIT DIAG2 
BOP RX BASIC RECLIVfc/F 



4860 
4861 
4862 
4863 
4864 
4865 
4866 

4867 



4866 
4869 
4870 
4871 
4872 
4873 
4874 
4875 
4876 
4877 
4878 
4879 
4880 

4881 



4882 
4883 
4884 



026672 
026672 

026676 
026702 
026704 
026706 
026710 
026710 
026712 
026712 
026714 

026716 
026 722 
02o724 
026726 
026732 
026734 

026736 
026742 

026744 
026746 
026750 
026750 
026752 
026752 
026754 

026756 
026762 



004737 

004537 
003626 
OOOOOO 
103003 

104460 

104410 
000602 

004537 
000001 
000007 
004537 
OOOOOO 
OOOOOO 

004537 
000123 
000010 
103003 

104460 

104410 
000542 

004537 
000321 



HIO 
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LAG RECOGNITION TEST 

.SBTTL TEST 4 -- BOP RX BASIC RECEIVE/FLAG RECOGNITION TEST 

;+4********************************* ************************ ****************** 
1 + 

TEST 4 -- BOP RX BASIC RECEIVE/FLAG RECOGNITION TEST 



C _,EQ 0124 



005544 
007324 



007734 
007734 

007622 



5* 

;♦ 

}* 

; * 

J* 

;* 
;* 
;♦ 

; * 

I* 

* 

* 
* 

* 
* 
* 
* 
* 



THE USYRT IS INITIALIZED FOR BOP MODE WITH TTL LOOPBACK SELECTED. 
"SECONOARY STATION ADDRESS" IS NOT USED ANO NO CRC/VRC IS CALCULATED. 
A PATTERN IS TRANSMITTED ANO TERMINATED FOLLOWED BY A SECOND MESSAGE. 
TERMINATION OF THE FI3ST MESSAGE IS ACCOMPLISHED WITH A FLAG 
CHARACTER BUT RXE IS NOT DROPPED SO THAT THE SECOND MESSAGE CAN BE 
SENT WITHOUT RE-SYNCRONIZITION. SEVERAL FLAG'S ARE IDLED BETWEEN THE 
TWO MESSAGES. DURING THE SECONO MESSAGE A RECEIVER OVERRUN CONDITION 
IS FORCED. THROUGHOUT THIS TEST, BASIC RECEIVER OPERATION AND TIMING 
IS CHECKED. TRANSMITTED INFORMATION IS VERIFIED U * CHECKING THE DATA 
MADE AVAILABLE AT RXDB . 

TRANSMITTED PATTERN: FLAG FLAG 123 321 OOO 377 101 FLAG... FLAG 

321 123 377 000 2?6. 

RECEIVED PATTERN: 123 321 000 377 101 321 123. 

.*************************************************************************** 

BGNTST 



JSR 



PC.INIOMV 



JSR R5,INITRN 

NOCHK! SYNCH 



bcc ♦♦a. 

ERROR 
ESCAPE TST 



T4:: 
lINIT DMV-11, ENTER M-LOOP 

jLOAD 1 SOM, CLK TX UNTIL ACTIVE 
{SET BOP M0OE,SYNCH REG-226 
j USE 8 BIT CHARS 
;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CSERROR 

CJESCAPE 
L 10031 -. 



007622 



JSR 

TSOM 

7. 

JSR 

000 




R5.TXCTRL 


{LOAD 2ND FLAG.TX 1ST FLAG 






R5.TXCTRL 


{CLEAR TSOM 






JSR 

123 

8. 

BCC 

ERROR 

ESCAPE 


R5.TXCHAR 

,*8. 

TST 


j LOAD 123CDATA1), TX 2ND FLAG 

; BR IF NC ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 


TRAP 

TRAP 
.WORD 


C* ERROR 

CSESCAPE 
L10031-. 


JSR 
321 


R5.TXCHAR 


{LOAD 32HDATA2), TX 123CDATA1) 







CNOMOAO DMV11 LINE UNIT DIAG2 MACRO M1200 i\: FFB-84 1^: 39 PAGE 
TEST 4 -- BOP RX BASIC RECEIVE/FLAG RECOGNITION TEST 



i 1 

671 



SEQ 0125 



4835 


026 764 


000010 


4886 


026766 


103003 


4887 


026770 






026770 


104460 


4888 


026772 






026772 


104410 




026774 


000522 


4889 






4890 


026776 


004537 


4891 


027002 


OOOOOO 


4892 


027004 


000010 


4893 


027006 


103003 


4894 


027010 






027010 


104460 


4895 


027012 






027012 


104410 




027014 


00C502 


4896 






4897 


027016 


004537 


4898 


027022 


000377 


4899 


027024 


OOOOOO 


4900 


027026 


103003 


4901 


027030 






027030 


104460 


4902 


027032 






027032 


104410 




027034 


000462 


4903 






4904 


027036 


004537 


4905 


027042 


OOOOOO 


4906 


027044 


103003 


4907 


027046 






027046 


104460 


4908 


027050 






027050 


104410 




027052 


000444 


4909 






4910 


027054 


0O4537 


4911 


027060 


000523 


4912 


027062 


OOOOOO 


4913 


027064 


OOOOIO 


4914 


027066 


103O03 


4915 


027070 






027070 


104460 


4916 


027072 






027072 


104410 




027074 


000422 


4917 






4918 


027076 


004537 


4919 


027102 


000101 


4920 


027104 


OOOOOO 


4921 


027106 


103003 


492? 


027110 






027110 


104460 


4923 


027112 






027112 


104410 




027114 


000402 



007622 



007622 



011310 



010034 



00762H 



8. 

BCC 

ERROR 


.♦8. 


ESCAPE 


TST 


JSR 

000 

8. 

BCC 

ERROR 


R5, TXCHAR 
. »8. 


ESCAPE 


TST 


JSR 

377 



BCC 

ERROR 


R5. TXCHAR 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5,RCV1ST 

,♦8, 


ESCAPE 


TST 


JSR 

RXSOM.'l 



8. 

BCC 

ERROR 


R5.RXCHAR 
,25 

,♦8. 


ESCAPE 


TST 


JSR 

101 



BCC 

ERROR 


R5, TXCHAR 
.+8. 


ESCAPE 


TST 



{BR IE NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



;LOAD 000CDATA3), TX 32KDATA2) 



{BR IF NO ERROR 
iRE D 0RT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 377CDATA4) 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CLOCK ANO RCV 123CDATA1) 

j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



;READ £ CHK 123CDATA1), RCV 321CDATA2) 
I 6 CHECK RSOM-1 



j BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{LOAD 10KDATA5) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TQ ENO OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CiERROR 

CfESCAPE 

L10031-. 



CJERROR 

CIESCAPE 
L10031-. 



CfERROR 

CJESCAPE 
L10031-. 



CtERROR 

C* ESCAPE 
L10031-. 



CI ERROR 

C$ESCAPE 
L10031-. 



CiERROR 

C5ESCAPE 
U003i~> 
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J10 
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bEQ 0126 



4924 
4925 
4926 
4927 
4928 
4929 
4930 

4931 



4932 
4933 
4934 
4935 
4936 
4937 
4938 
4939 
4940 
4941 
4942 

4943 



4944 
4945 
4946 
4947 
4948 
4949 
4950 
4951 
4952 
4953 
4954 

4955 



4956 
4957 
4958 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 

4967 



4968 



027116 
027122 
027124 
027126 
027130 
027132 
027132 
027134 
027134 
027136 

027140 

027144 
027146 

027150 
027154 
027156 
027160 
027162 
027164 
027164 
027166 
027166 
027170 

027172 
027176 
027200 

027202 
027206 
027210 
027212 
027214 
027216 
027216 
027220 
027220 
027222 

027224 
027250 
027232 

027234 
027240 
027242 
027244 
027246 
027250 
027250 
027252 
027252 
027254 



004537 
000321 
OOOOOO 
000010 
103003 

104460 

104410 
000360 

004537 
000002 
OOOOOO 

004537 
OOOOOO 
OOOOOO 
0OOO10 
103003 

104460 

104410 
000326 

004537 
0OOO02 
OOOOOO 

004537 
000377 
OOOOOO 
020010 
103003 

104460 

104410 
000274 

004537 
000002 
OOOOOO 

004537 
001101 
OOOOOO 
060010 
103003 

104460 

104410 
000242 



010034 



007/34 



010034 



0C7734 



010034 



007734 



010034 



JSR 


R5.RXCHAR 


}REAO/CHECI< 321CDATA2),RCV 


000CDATA3) 




321 












8. 










BCC 


.♦8. 


;BR IF NO ERROR 






ERROR 




jREPORT STACKED ERROR 


TRAP 


CiERRCR 


ESCAPE 


TST 


sSKIP TO END OF TEST 


TRAP 
.WORD 


CSESCAPE 
L10031-. 


JSR 


R5.TXCTRL 


j LOAD TEOM 






TEOM 











JSR 


R5.RXCHAR 


j READ/CHECK 000CDATA3) ,RCV 


377CDATA4) 




000 











8. 










BCC 


♦ *e. 


jBR IE NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPE 
L10031-. 


JSR 


R5.TXCTRL 


j LOAD TEOM 






TEOM 











JSR 


R5.RXCHAR 


{READ/CHECK 377CDATA4).RCV 


101CDATA5) 




3?7 


NCRACT! 




i ANO TX CFLAG1) 






[8. 


jDON'T CHECK RECEIVER ACTIVE 




BCC 


.♦8. 


j BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


I SKIP TO END OF TEST 


TRAP 
.WORD 


C$F.SCAPE 
L 10031 -. 


JSR 


R5.TXCTRL 


{LOAD TEOM 






TEOM 











JSR 


R5.RXCHAR 


{READ/CHECK 101CDATA5) ,RCV 


CFLAG1) 




RXEOMM 

C 

NFCRDA: 


L01 


{ TX CFLAG2) € CHECK REOM 






•NCRACTJ8, 


j DON'T CHECK FOR FINAL ROA' 


-RXACT-1 




BCC 


.♦8, 


{BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CtERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CiESCAPE 
L10031-. 
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007734 



007622 



4969 


027256 


004557 


4970 


027262 


000000 


4971 


027264 


000000 


4972 






4973 


027266 


004537 


4974 


027272 


000321 


4975 


027274 


100010 


4976 


027276 


103003 


4977 


027300 






027300 


104460 


4978 


027302 






027302 


104410 




027304 


000212 


4979 






4980 


027306 


004537 


4981 


027312 


000123 


4982 


027314 


100010 


49B3 


027316 


103003 


4984 


027320 






027320 


104460 


4985 


027322 






027322 


104410 




027324 


000172 


4986 






4987 


027326 


004537 


4988 


027332 


000377 


4989 


027334 


100010 


4990 


027336 


103003 


4991 


027340 






027540 


104460 


4992 


027342 






027342 


104410 




027344 


0O0152 


4993 






4994 


027346 


004537 


4995 


027352 


000000 


4996 


027354 


OOOOOO 


4997 


027356 


103003 


4998 


027360 






027360 


104460 


4999 


027362 






027362 


104410 




027364 


000132 


5000 






5001 


027366 


004537 


5002 


027372 


000721 


5003 


027374 


OOOOOO 


5004 


027376 


000010 


5005 


027400 


103003 


5006 


027402 






027402 


104460 


5007 


02 7404 






027404 


104410 




027406 


000110 


5008 






5009 


027410 


004537 


5010 


027414 


000276 



007622 



007622 



007622 



010034 







K10 










FEB -84 


15:39 PAGE 


67 


3 










TEST 
















JSR 


R5.TXCTRL 






S CLEAR 


TEOM 






000 

















JSR 


R5.TXCHAR 






j LOAD 


321CDATA6^,TX (FLAG3) 






321 
















NCTBMT* 


• 256. !8. 






{DON'T 


CHECK TBMT 






BCC 


.♦8. 






; BR IF 


NO ERROR 






ERROR 








i REPORT STACKED ERROR 


















TRAP 


C TERROR 


ESCAPE 


TST 






(SKIP 


TO END OF TEST 


TRAP 
.WORD 


CSESCAPE 
L10031-. 


JSR 


R5.TXCHAR 






{LOAD 


123CDATA7),TX(DATA6) 






123 
















NCT6MH 


^256. !8. 






jDON'T 


CHECK TBMT 






BCC 


.♦8. 






{BR IF 


NO ERROR 






ERROR 








{REPORT STACKED ERROR 


















TRAP 


CJERROR 


ESCAPE 


TST 






{SKIP 


TO END OF TEST 


TRAP 
.WORD 


CSESCAPE 
L10031-. 



R5,TXCHAR 



JSR 

377 

NCTBMT+256.18. 

BCC . *8. 

ERROR 

ESCAPE TST 



{LOAD 377(DATA8),TXCDATA7) 

,DON'T CHECK FINAL TBMT 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CJERROR 

CIESCAPE 
L10031-. 



007622 



JSR 


R5.TXCHAR 


{LOAD OOOC0ATA9) 






000 











BCC 


.♦8. 


;BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CJERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 

.WORD 


C i ESCAPE 
LJ.0031-. 


JSR 


R5.RXCHAR 


{READ/CHECK 321CDATA6) ,RCV 


123CDATA7) 




RXS0MJ321 










6. 

BCC 


.♦8. 


;RR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CJERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CJESCAPE 
110031 -. 


JSR 


R5.TXCHAR 


jLOAD 276CDATA10) 






276 











SEQ 0127 



L. 10 
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50U 
5012 
5013 

5014 



5015 
5016 
50.17 
50.18 
501.9 
5020 
5021 

5022 



5023 
5024 
5025 
5026 
5027 
5028 
5029 

5030 



5041 
5032 
5033 
5034 
5035 
5036 
5037 
5038 

5039 



5040 



027416 
027420 
027422 
027422 
027424 
027424 
027426 

027430 
027434 
027436 
027440 
027442 
027444 
027444 
027446 
027446 
027450 

027452 
027456 
027462 
027464 
027466 
027470 
027470 
027^,72 
027472 
027474 



027500 
027504 
027506 
027510 
027510 
027512 
027512 
027514 
027516 
027516 
027516 



000000 
103003 

104460 

104410 
000070 

004537 010034 

000123 

000000 

100014 

103003 

104460 

104410 
000046 

012704 000010 
004537 007622 
000000 
100010 
105003 

104460 

104410 
000022 



027476 077411 



5$: 



004537 006422 

OO0001 

103003 

104460 

104410 
000002 



104401 



ENOTST 





BCC . *8. 

ERROR 

ESCAPE TST 



JSR 

123 



N0CRDAJ12, 

BCC . *8, 

ERROR 

ESCAPE TST 



R5.RXCHAR 



MOV *8,,R4 

JSR R5.TXCHAR 
000 

NCTBMT*256,!8. 

BCC . *8. 
ERROR 

ESCAPE TST 



SOB 



R4.5I 



JSR R5.CKR0R 

1 

BCC . *8. 

ERROR 

ESCAPE TST 



sBR IF NO ERROR 

j REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



j READ/CHECK 123CDATA7) ,RCV 377CDATA8) 



{NO CHECK OF INITIAL RDA-0 

i BR IF NO ERROR 

j REPORT STACKED ERROR 

{SKIP TO END OF TEST 



jINIT CHARACTER COUNT 

lLOAD/TX FILLER (OVERFLOW FIFO) 

{DON'T CHECK FINAL TBMT 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



;FILL TO OVERFLOW 



{CHECK RECEIVER OVERRUN BIT 
I CIT SHOULD BE SET) 
{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



L10031: 



TRAP 

TRAP 
.WORD 



TRAP 



C*ERROR 

C$ESCAPE 
L10031-, 



C* ERROR 

CiESCAPF 
L10031-. 



CJERROR 

C (ESCAPE 

L10031-. 



C TERROR 

CJESCAPE 
1 .10031-. 



C*ETST 



SEQ 0128 



CNDMDAO 
TEST 5 
5055 



M10 
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.SBTTL TEST 5 - - BOP RX SECONDARY STATION ADDRESSING 

i* 

TEST 5 -- BOP RX SECONDARY STATION ADDRESSING 



SEQ 0129 



5056 
5057 
5058 
5059 



5060 
5061 
5062 
5063 
5064 
5065 

5066 
5067 
5068 
5069 
5070 

5071 



5072 
5073 
5074 
5075 
5076 
5077 
5078 
5079 
5080 
5081 
5082 
5083 
5084 



027520 
027520 
027524 

027526 
027526 
027526 
027530 
021562 



02/540 
027540 
027542 
027546 
027550 
027552 
027554 
027554 
027556 
027556 
027560 



027562 
027566 
0275/2 
027576 
027602 
027606 
027612 
027616 



004737 
005004 



104402 
005002 
116437 



104404 
004537 
013400 
000000 
103003 

104460 

104410 
000422 



116203 
110337 
110337 
110337 
110337 
11033/ 
105137 
113737 



005344 



030224 027546 



007324 



002651 
027650 
027730 
030010 
030126 
027710 
02/710 
027710 



'.* 

;* 
;* 
;* 

5* 
!* 
J* 

;* 

* 
* 

* 
* 



THE USYRT IS INITIALIZED FOR BOP MODE WITH TTl LEVEL. LOOPBACK, 
SAM « 1, APA-O, AND ECM - 7, USING SHORT MESSAGES. THE ADDRESSES 
000, 125, 252, 176, AND 177 ARE CHECKED TO SEE THAT THE RECEIVER 
RECOGNIZES THEM CORRECTLY. IN EACH CASE CAT EACH ADDRESS), A SERIES OF 
20 DIFFERENT MESSAGES ARE SENT TO VERIFY THAT THE USYRT WILL ONLY 
RESPOND TO THE SPECIFIED VALUE. 

TEST PATTERN; ADR 000 OCR ADR 

WHERE ADR IS THE ADDRESS BEING TESTED AND OCA IS THE ONE'S 

COMPLEMENT OF THAT ADDRESS. 

_******+*******************************************************>************ 



BGNTST 

JSR 
CLR 

OLOOP: BGNSUB 



PC.INIDMV 
R4 



T5: : 
jINIT DMV 11, ENTER M LOOP 
{CLEAR TEST ADDR INDEX (0,125,252,176,177) 



T5.1: 

TRAP CfBSUB 
CLR R2 {CLEAR TX ADDRESS INOEX (0 ■> 20.) 

MOVB ADPAT(R4),NWSAR {INSTALL NEW S/AR VALUE IN "INNER LOOP" 

********* ******A*4.*****************t********************************** 

INNER LOOP; TEST ONE "TEST ADDRESS" (0,125,252,176, OR 177) 

**************************** ** **************************************** 

BGNSEG 

TRAP CJBSEG 
ILOOP: JSR R5.INITRN {LOAD 1 SUM. Cl.K TX UNTIL ACTIVE 
NWSAR: SECADR!NOCHK!000 {SET BOP MODE , SAM- 1,<W>S/AR IS VARIABLE*** 

{USE 8 BIT CHARS 
{BR IF NO ERROR 
{REPORT STACKED ERROR 

TRAP CiERROR 
{SKIP TO END Of TEST 

TRAP C1ESCAPE 
.WORD 10000$-. 



JSR R5.INITRN 

SECADR!N0CHK!000 



BCC . *8. 

ERROR 

ESCAPE SEG 



SETUP TX/RX STRINGS (ADR 000 OCA ADR) 



ADR TAKEN FROM PATX1 



030074 



MOVB 


PATX1(R2),R3 


MOVB 


R3,lt 


MOVB 


R3.3* 


MOVB 


R3,4i 


MOVB 


R3.6I 


MOVB 


R3,2$ 


COMB 


21 


MOVB 


2*. 5$ 



jADR -> R3 

{ADDRESS(ADR) -> 1$,3*,4$,6$ 



jADDRESS_NOTCOCA) «> 2$, 5$ 



NIC) 

CNDMDAO DMV11 LINE UNIT DIAG2 MACRO M1200 22 -FEB -84 15:39 PAGE btt-1 
TEST 5 -- BOP RX SECONDARY STATION ADDRESSING 

5085 ; NOW TRANSMIT TEST PATTERN 

5086 j — 

5087 027624 004537 007734 JSR R5.TXCTRL {LOAD 2ND FLAG,TX 1ST FLAG 

5088 027630 000001 TSOM 

5089 027632 000007 7. 

5090 027634 004537 007734 JSR R5.TXCTRL {CLEAR TSOM 

5091 027640 000000 000 

5092 027642 000000 

5093 027644 004537 007622 JSR R5.TXCHAR {LOAD ALD.iESS, TX 2ND FLAG 

5094 027650 000000 1$; 000 ! ** HOLF FOR SECONDARY STATION ADDRESS 

5095 027652 000010 8. 

5096 027654 103003 BCC . *8. {BR IF NO ERROR 

5097 027656 ERROR {REPORT STACKED ERROR 

027656 104460 TRAP 

5098 027660 ESCAPE SEG {SKIP TO END OF TEST 

027660 104410 TRAP 

027662 000320 .WORD 

5099 02/664 004537 007622 JSR R5.TXCHAR {LOAD 000, TX ADDRESS 

5100 027670 000000 000 

5101 027672 100011 NCTBMT*256. !9. {DON'T CHECK TBMT 

5102 027674 103003 BCC . *8. {BR IF NO ERROR 

5103 027676 ERROR {REPORT STACKFD ERROR 

027676 104460 TRAP 

5104 027700 ESCAPE SEG {SKIP TO END OF TEST 

027700 104410 TRAP 

027702 000300 .WORD 

5105 027704 004537 007622 JSR R5.TXCHAR {LOAD ADDR_N0T, TX 000 

5106 027710 000000 2$: 000 {** HOLE FOR COMPLEMENTED ADDRESS 

5107 027712 100010 NCTBMT*256 . !8. jDON'T CHECK TBMT 

5108 027714 103003 BCC .+8, ;BR IF NO ERROR 

5109 027716 ERROR {REPORT STACKED ERROR 

027716 104460 TRAP 

5110 027720 ESCAPE SEG {SKIP TO END OF TEST 

027720 104410 TRAP 

027722 000260 .WORD 

5111 027724 004537 007622 JSR R5.TXCHAR {LOAD ADDRESS AGAIN 

5112 027730 000000 3$: 000 {** HOLE FOR ADDRESS C AGAIN) 

5113 027732 OOOOOO 

5114 027734 103003 BCC , *8. jBR IF NO ERROR 

5115 027736 ERROR {REPORT STACKED ERROR 

027736 104460 TRAP 

5116 027740 ESCAPE SEG {SKIP TO END OF TEST 

027740 104410 TRAP 

027742 000240 .WORD 

5117 027744 004537 011540 JSR R5.STEPLU {CLOCK/RCV ADDRESS FIELD 

5118 027750 000003 3 
5119 

5120 027752 004537 006122 JSR R5.CKRDA {DID U5YRT RESPOND TO ADDRESS ?? 

5121 02 7756 000001 1 

5122 027760 103471 BCS 10$ {BR IF RDA-0 

5123 - - 

5124 ; USYRT RESPONDED TO MESSAGE (RDA-1): SHOULD IT HAVE? 

5125 j .- 

5126 027762 123703 027546 CMPB NWSAR.R3 } IS ADDRESS - S/AR ? 

5127 027766 001406 BEQ 40$ {BR IF YES 

5128 . - 

5129 j ...NO, REPORT ERROR i "USYRT RESPONDED TO WRONG ADDRESS" 



SEQ 0130 



CJERROR 

C*ESCAPE 
10000$ - . 



CSERROR 

CtESCAPE 

10000$-. 



C* ERROR 

C*t SCAPE 
10000$-. 



CJERROR 

CtESCAPE 
10000$-. 



m 1 

CNDMOAO DMVll LINE UNIT DIAG2 MACRO M120O .-?«? FEB -64 15} 39 PAGE OB 2 
TEST 5 - BOP RX SECONDARY STATION ADDRESSING 



':>EQ 0151 



5130 








5131 


027770 








027770 


104455 






027772 


000053 






027774 


016466 






027776 


022204 




5132 


030000 








0300OO 


104410 






030002 


000200 




5133 








5134 








5135 








5136 


030004 


004537 


010034 


5137 


030010 


0OO40O 




513a 


030012 


OOOOOO 




5139 


030014 


10CO10 




5140 


030016 


103003 




5141 


030020 








03002O 


104460 




5142 


030022 








030022 


104410 






030024 


000156 




5143 


030026 


004537 


007734 


5144 


030032 


000002 




5145 


030054 


OOOOOO 




5146 


030036 


0045 T7 


010034 


5147 


030042 


OOOOOC 




5148 


030044 


OOOOOO 




5149 


030046 


100010 




5150 


030050 


103003 




5151 


030052 








030052 


104460 




515? 


030054 








030054 


104410 






030056 


000124 




5153 


03006O 


004537 


007734 


5154 


030064 


000002 




5155 


030066 


OOOOOO 




5156 


030070 


004537 


010034 


5157 


030074 


OOOOOO 




5158 


030076 


OOOOOO 




5159 


030100 


120010 




5160 


030102 


103003 




5161 


030104 








030104 


104460 




5162 


030106 








050106 


104410 






030110 


000072 




5163 


030112 


004537 


007734 


5164 


030116 


00OO01 




5165 


030120 


OOOOOO 




5566 


030122 


0O4537 


010034 


5167 


030126 


001000 




5168 


030130 


OOOOOO 




5169 


030132 


060000 




5170 


030154 


103014 





GEDF EM102,ERR21 



ESCAPE SEG 



"DEVICE FATAL" ERROR Q 43 

TRAP 
.WORD 
.WORD 
.WORD 

TRAP 
.WORD 



l - 



I ...YES, REAP AND VERIFY RECEIVED MESSAGE 



401: 
4$: 



51: 



tti 



JSR R5.RXCHAR 

RXSOH'000 



N0CRDAJ8. 

BCC ,»8. 

ERROR 

ESCAPE SEG 



JSR R5.TXCTRL 

TEOM 



JSR R5.RXCMAR 

000 



NOCRDA'8. 

BCC ,*8. 

ERROR 

ESCAPE SEG 



JSR R5.TXCTRL 

TEOM 



JSR RS.RXCHAR 

000 



NOCRDAINCRACT56. 

BCC ,*8. 

ERROR 

ESCAPE SEG 



JSR R5.TXCTRL 

TSOM 



JSR R5.RXCHAR 

RXEOrijOOO 



NTCR0A1NCRACT 

BCC 50* 



j READ L CHK ADORESS, HCV 000 
I 6 CHECK RSOM-1 

)N0 INITIAL CI-CCK Of RDA-0 
i BR IF NO ERROR 
jREPORT STACKED ERROR 

I SKIP TO ENO OF TEST 



jSET TEOM 



TRAP 

TRAP 
.WORD 



iREAO/CHECK OOO 



|N0 INITIAL CKCK OF RDA-0 
i BR IF NO ERROR 
jREPORT STACKED ERROR 

1SKIP TO ENO OF TEST 



iSET TEOM 



TRAP 

TRAP 

.WORD 



iREAO/CHECK C0ff>LEMtNTcD ADORESS 
!•» MOLE FOR ADORESS NOT 
iNO INITIAL CHECK OF ROA-O 
iDON'T CHECK FINAL RXACW 
, BR IF NO ERROR 
jREPORT STACKED ERROR 

jSKIP TO ENO OF TEST 



TRAP 



C*ERDF 
43 

EM102 
ERP21 

CIESCAPE 
10000$*. 



CtERROR 

CIESCAPE 
10000$-. 



CJERROR 

CtESCAPE 
100001*. 



j SET TSOM 



TRAP 

.WORD 



CIERROR 

CIESCAPE 
10000*-, 



jREAD/CMECK ADORESS (AGAIN) 
j** HOLE FOR FINAL ADDRESS 

iDON'T CHfeCK FOR FINAL RDA-RXACT-1 
iBR IF NQ ERROR (TO CONTINUE TEST) 



CNDMDAO 


DMV11 LINE UN11 


DIAG2 


TEST 5 - 


BOP RX SECONDARY STA 


51^1 


030136 








030136 


104460 




5172 


030140 








030140 


104410 






030142 


000040 




S173 








I 174 








5175 








51.-6 


030144 


123705 


027546 


5x7; 


030150 


001006 




5178 








5179 








5180 








5181 


030152 








030152 


104455 






030154 


000054 






030156 


016530 






030160 


022146 




5182 


030162 








030162 


104410 






030164 


000016 




5183 








5184 








5185 








5186 


030166 


005202 




5187 


030170 


022702 


000025 


5188 


030174 


001402 




5189 


03OI76 


000137 


027542 


5190 


030202 
030202 








030202 


104405 




5191 








5192 


030204 


005204 




5193 


030206 


020427 


000005 


5194 


030212 


001402 




5195 


03O214 


000137 


027526 


5196 


03O220 
030220 








030220 


104403 




5197 


030222 
030222 








03O222 


104401 




5198 








5199 


030224 


OOO 




5200 


030225 


125 




5201 


03O226 


252 




5202 


030227 


176 




5203 


030230 


177 




5204 








5205 









MACRO M1?00 . 
ION ADDRESSING 



C 1. L 

PAUL 68-3 



ERROR 
ESCAPE 



SEC, 



iREPORT STACKED ERROR 
iSKIP TO END OF TFST 



TRAP 

TRAP 
.WORD 



i U5YRT DIDN'T RESPOND TO MESSAGE CRDA-O): SHOULD IT HAVE ? 
I - - - - 



10$: 



CMPB 
BNE 



NUSAR.R3 
50$ 



j WAS NON -RESPONDING ADDR-S/AR ? 
iQR IF HO 



t ...NO, REPORT ERROR : "USYRT DIDN'T RESPOND TO SECONDARY STATION ADDR 



I 



GEDF 



EM103.ERR20 



ESCAPE SEG 



"DEVICE FATAL" ERROR 44 

TRAP 
.WORD 
.WORD 
.WORD 

TRAP 
.WORD 



I... YES. UPDATE ADDRESS AND CONTINUE "ESTING 
50$ j 



INC 

CMP 
BEQ 

JMP 
ENDSEG 



R2 

#21.. R2 

.♦6 

ILOOP 



j INCREMENT TESTING ADDRESS INDEX 



i IF INDEX .LE. 20 THEN CHECK IT 
I OTHERWISE END INNER LOOP... 

10000$: 



TRAP 



ENDSU6 
ENOTST 



INC 
CMP 
BEQ 
JMP 



R4 

R4.05 

.♦6 

OLOOP 



I INCREMENT ACTUAL TEST AOORESS INDEX 

tALL 5 TEST AOORESSES CHECKED? 

I BR IF DONE 

I NOT DONE? 00 NEXT ADDRESS 



L 10033: 
L10032: 



TRAP 



TRAP 



ADPAT: 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.EVEN 



000 
125 
252 
176 

177 



CIERROR 

C$E r >CAPE 
10000$- . 



C$ERDF 
44 

EM105 
ERR20 

C$ESCAPE 
10000$-. 



C$ESEG 



C$ESU6 
C$ETST 



SEQ 0152 



CNDMOAO 

TEST 6 

5218 



DMVil LINE UNI! DIAG2 MACRO M1200 ,'_'2 FEB -84 l r >}39 
BOP RX ALL PARTIES ADDRESS TEST 

.SBTTL 



I) 1 1 

PAGE 69 



SEQ 0133 



5219 
5220 
5221 
5222 



5223 
5224 
5225 
5226 
5227 

5228 



5229 
5230 
5231 
5232 
5233 
5234 
5235 
5236 
5237 
5236 
5239 
5240 
5241 
5242 
5243 
5244 
5245 
5246 
5247 
5243 
5249 
5250 



03O232 
030232 
030236 

030240 
030240 
030240 
030242 
030246 
030250 
030252 
030254 
030254 
030256 
030256 
030260 



030262 
03O266 
03O272 
030276 
030302 
03O306 
030312 



030320 
030324 
03O326 
030330 
030334 
030336 
030340 
030344 
030346 



004737 
005003 



104402 
004537 
113523 
000000 
103003 

104460 

104410 
000444 



110337 
110337 
110337 
110337 
110337 
105137 
113737 



004537 
000001 
000007 
004537 
000000 
000000 
004537 
000000 
000010 



005344 



007324 



030344 
030424 
03O512 
030630 
030404 
030404 
030404 



007734 
007734 
007622 



030576 



TEST 6 -- BOP RX ALL PARTIES ADDRESS TEST 

TEST 6 -- BOP RX ALL PARTIES AOORESS TEST 

INITIALIZE THE USYRT FOP BOP MODE WITH TTL LEVEL LOOPBACK 

SAM - 1, S/AR - 123C0CT.), APA - 1, ANO ECM > 7. 

A SERIES OT 256 DIFFERENT SHORT MESSAGES APE SENT TO VERIFr THAT 

THE USYRT WILL ONLY RESPONO TO THE SPECIFIED VALUE AND ALSO 377 (FF 

HEX. ), 



TEST PATTERN: ADR 000 OCA ADR 
WHERE ADR IS TH6 ADDRESS BEING 
COMPLEMENT OF THAT ADDRESS. 



TESTED AND OCA IS THE ONE'S 



BGNTST 







T6:j 


JSR 


PC.INIDMV 


lINIT DMV-11. ENTER M-LOOP 


CLR 


R3 


j CLEAR ADDRESS 



LOOP} BGNSUB 



JSR R5.INITRN 

AP AD • SECADR I NGCHK • 123 



BCC . *8. 

ERROR 

ESCAPE SUB 



T6.1: 

TRAP CJBSU6 

iLOAO 1 SOM. CLK TX UNTIL ACTIVE 
jSET BOP MOOE,APA-1,SAM-1,ECM*7,S/AR-123 
i USE 6 BIT CHARS 
I BR IF NO ERROR 
jREPORT STACKED ERROR 

TRAP 
jSKIP TO ENO OF TEST 

TRAP 

.WORD 



CJERROR 



CIESCAPE 
L10035-. 



SETUP TX/RX STRINGS (ADR 000 OCA ADR) 

lADORESS(ADR) -> l*,3t,4*,6S 



MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
COMB 
MOVB 



R3.ll 

R3,3* 

R3,4$ 

R3.6I 

R3.2* 

2% 

21,51 



jADDRESS.NOT(OCA) -> ?J,5$ 



NOW TRANSMIT TEST PATTERN 
R5.TXCTRL 



1$ 



JSR 

TSOM 

7, 

JSR 

000 



JSR 

000 

6. 



R5.TXCTRL 
R5,TXCHAR 



jLOAD 2N0 FLAG.TX 1ST FLAG 
I CLEAR TSOM 



jLOAD ADDRESS, TX 2ND FLAG 

;♦* HOLE FOR SECONOARY STATION ADDRESS 



CNOMOAO 

TEST 6 

5251 
5252 

5253 



5254 
5255 
5256 
5257 
5258 

5259 



5260 
5261 
5262 
5263 
5264 

5265 



5266 

5267 
5268 
5269 
5270 

5271 



5272 
5273 
5274 
5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5283 
5284 
5285 
5286 
52P.7 
5288 



5289 



r i j. 

DMVll LINE UNIT DIAG2 MACRO M120Q 22FEB-84 15:39 PAGE 69-1 
•- BOP RX ALL PARTIES ADDRESS TEST 

030350 103003 BCC . *8. { BR If* NO ERROR 

030352 ERROR {REPORT STACKED ERROR 

030352 104460 TRAP 

030354 ESCAPE SUB jSKIP TO END OF TEST 

030354 104410 TRAP 

030356 000346 .WORD 

030360 004537 007622 JSR R5.TXCHAR {LOAD 000, TX ADDRESS 

030364 000000 000 

030366 100011 NCTBMT*256. !9. 

030370 103003 BCC . *8, {BR IE NO ERROR 

030372 ERROR {REPORT STACKED ERROR 

030372 104460 TRAP 

030374 ESCAPE SUB {SKIP TO END OF TEST 

030374 104410 TRAP 

030376 000326 .WORD 

02C-100 0O4537 007622 JSR R5,TXCHAR {LOAD ADOR NOT, TX 000 

050404 OOCOOO 2$: 000 {** HOLE FOR COMPLEMENTED ADDRESS 

03040^ 100010 NCTBMT*256. »6. 

030410 103003 BCC , >8. { BR IF NO ERROR 

030412 ERROR {REPORT STACKED ERROR 

030412 104460 TRAP 

030414 ESCAPE SUB {SKIP TO END OF* TEST 

030414 104410 TRAP 

030416 000306 .WORD 

030420 004537 007622 JSR R5.TXCHAR {LOAD ADDRESS AGAIN 

030424 OOOOOO 3$: OOO {** HOLE FOR ADDRESS (AGAIN) 

030426 OOOOOO 

030430 103003 BCC . *8. {BR IF NO ERROR 

030432 ERROR {REPORT STACKED ERROR 

030432 104460 TRAP 

030434 ESCAPE SUB {SKIP TO END OF TEST 

030434 104410 TRAP 

030436 000266 .WORD 

030440 004537 011540 JSR R5.STEPLU jCLOCK/RCV ADDRESS FIELD 

030444 000002 2 

030446 004537 006122 JSR R5.CKRDA >DID USYRT RESPOND TO ADDRESS ?? 

030452 000001 1 

030454 103475 BCS 10$ , BR IK RDA-0 

t 

5 USYRT RESPONDED TO MESSAGE CRDA-1): SHOULD IT HAVE? 

030456 022703 000123 CMP 4123, R3 {ADDRESS - 123 ? 

030462 001411 BEQ 401 {BR IF YES 

030464 022703 000377 CMP *377,R3 {ADDRESS - 377 ? 

030470 001406 BEQ 40$ 

1 ...NO, REPORT ERRC3 : "USYRT RESPONDED TO WRONG ADDRESS" 

030472 ' GEDF EM102.ERR21 

i "DEVICE FATAL " ERROR C 45 

030472 104455 TRAP 

030474 000055 .WORD 

030476 016466 .WORD 

030500 022204 .WORD 

030502 ESCAPE SUB 

030502 104410 TRAP 



SEQ 0134 



C* ERROR 

CiESCAPF 
L 10035 •« 



CJERROR 

C$ESCAPE 
L10035-. 



CSERROR 

CSESCAPE 
L10035-. 



C$ERROR 

CIESCAPF. 

L 10035 -. 



CIERDF 
45 

EM102 
ERR21 

CIESCAPE 



CNOMOAO DMVll LINE UNIT DIAG2 MACRO M1200 
TEST 6 -- BOP RX ALL PARTIES ADDRESS TEST 



r i. l 

22-FEB-84 15i39 PAGE 69-2 



5290 
5291 
5292 
5293 
5294 
5295 
5296 
5297 
5298 

5299 



5300 
5301 
5302 
5303 
5304 
5305 
5306 
5307 
5308 

5309 



531.0 
5311 
5312 
5313 
5314 
5315 
5316 
5317 
5318 

5319 



5320 
5321 
5322 
5323 
5324 
5325 
5326 
5327 
5320 

5329 



5330 
5331 
5332 
5333 



030504 000220 



030506 
030512 
030514 
030516 
030520 
030522 
030522 
030524 
030524 
030526 
030530 
030534 
030536 
030540 
030544 
030546 
030550 
030552 
030554 
030554 
030556 
030556 
030560 
030562 
030566 
030570 
030572 
030576 
030600 
050602 
030604 
030606 
030606 
03O610 
030610 
030612 
030614 
030620 
030622 
030624 
030630 
0^0632 
03O634 
03O636 
030640 
030640 
030642 
030642 
030644 
030646 



004537 
000400 
OOOOOO 
100010 
103003 

104460 

104410 
000176 
0O4537 
000002 

oocooo 

004537 
OOOOOO 
OOOOOO 
100010 
103003 

104460 

104410 
000144 
004537 
000002 
OOOOOO 
004537 
OOOOOO 
OOOOOO 
120010 
103003 

104460 

104410 
000112 
004537 
000001 
OOOOOO 
004537 
001000 
OOOOOO 
060000 
103003 

104460 

104410 
000060 
000422 



010034 



007734 
010034 



007734 
010034 



007734 
010034 



.WORD L 10035 -. 



...YES, READ AND VERIFY RECEIVED MESSAGE 



j - - * 

40$; 
4$: 



5$ 



6* 



JSR R5.RXCHAR 

RXSOM'000 



N0CRDA!8. 

BCC . *8. 

ERROR 

ESCAPE sue 



R5.RXCHAR 



JSR R5.TXCTRL 

TEOM 



JSR 

000 



N0CPDAJ8. 

BCC .*8. 

ERROR 

ESCAPE SUB 



JSR R5.TXCTRL 

TEOM 



JSR R5.RXCHAR 

000 



NOCRDA'NCRACT'8, 

BCC ,*8. 

ERROR 

ESCAPE SUB 



JSR R5,TXCTRL 

TSOM 



JSR R5,RXCHAR 

RXEOMJOOO 



NFCRDAJNCRACT 

BCC .*8. 

ERROR 

ESCAPE SUB 



j READ £ CHK ADDRESS, RCV 000 
I £ CHECK RSOM-1 

{NO INITIAL CHECK OF RDA»0 
; BR IF NO ERROR 
{REPORT STACKED ERROP 

j SKIP TO END OF TEST 



j SET TEOM 



TRAP 

TRAP 
.WORD 



{READ/CHECK 000 



j NO INITIAL CHECK OF RDA=0 
{BR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



.♦SET TEOM 



TRAP 

TRAP 
.WORD 



tREAD/CHECK COMPLEMENTED ADDRESS 
;** HOLE FOR ADDRESS NOT 
jNO INITIAL CHECK OF RDA-0 
sDON'T CHECK FINAL RXACT-1 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{SET TSOM 



TRAP 

TRAP 
.WORD 



{READ/CHECK ADDRESS (AGAIN) 
>** HOLE FOR FINAL ADDRESS 

iDON'T CHECK FOR FINAL RDA-RXACT-1 

j BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

{SKIP TO END OF TEST 

TRAP 
.WORD 

}BR IU CONTINUE TEST 



BR 20* 
USYRT DIDN'T RESPOND TO MESSAGE CRDA-O): SHOULD IT HAVE ? 



C*ERROR 

C$ESCAPE 

L 10035 -. 



CJERROR 

CJESCAPE 
L. 10035 -. 



CIERROR 

C$ESCAPE 
L 10035 -. 



C*ERROR 

C1ESCAPE 
L 10035 -. 



SEQ 0135 



CNDMOAO 

TEST 6 

5334 
5335 
5336 

5337 
5338 
5339 



5340 



5341 
5342 
5343 
5344 
5345 
5346 
5347 



5348 



5349 

5350 
5351 
5352 
5353 
5354 
5355 



5356 



G 1 1 

DMVll LINE UNIT DIAG2 MACRO M1200 22 FF.S-84 15:39 PAGE 69-3 
- BOP RX ALL PARTIES ADDRESS TEST 

030650 022703 000123 10$: CMP $123, R3 }WA$ NON -RESPONDING ADDR*S/AR ? 

030654 001006 BNE 50* j8R IF NO 

! ...NO, REPORT ERROR : "USYRT DIDN'T RESPOND TO SECONDARY STATION ADDR" 

030656 ' GF.DF EM103,ERR20 

; "DEVICE FATAL" ERROR O 46 

030656 104455 TRAP C*ERDF 

030660 000056 .WORD 46 

030662 016530 .WORD EM103 

030664 022146 .WORD ERR20 

030666 ESCAPE SUB 

030666 104410 TRAP CiESCAPE 

030670 000034 .WORD L10035-. 

030672 022703 000377 50$t CMP $377, R3 ;WAS NON -RESPONDING ADDR*APA( 377) ? 

030676 001006 BNE 20 * t BR IF NO 

i ...NO, REPORT ERROR : "USYRT DIDN'T RESPOND TO ALL PARTIES ADORE SSC 377)" 

030700 ' GEDF EM104,ERR20 

i "DEVICE FATAL" ERROR G> 47 

030700 104455 TRAP C*ERDF 

030702 000057 .WORD 47 

030704 016607 .WORD EM104 

030706 022146 .WORD ERR20 

030710 ESCAPE SUB 

030710 104410 TRAP CIESCAPE 

030712 000012 .WORD L10035-. 

1...YES. UPDATE ADDRESS ANO CONTINUE TESTING 

030714 105203 20$ t INCB R3 i INCREMENT TESTING ADDRESS 

030716 001402 BEQ NOLP } IF ADDRESS .LE. 377 THEN CH6CK IT 

030720 000137 030240 JMP LOOP 

030724 NOLP: ENOSIE jOTHERWlSE END TEST 

030724 L 10035: 

030724 104403 TRAP C$ESUB 

030726 ENOTST 

030726 L 10034: 

030726 104401 TRAP CSETST 



SEQ 0136 



11 
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TEST 7 -• BOP RX BIT STUFFING TEST 
5371 



SEQ 0137 



5372 
5373 
5374 
5375 
5376 
5377 
5378 

5379 



5380 
5381 
5382 
5583 
5384 
5385 
5386 
5387 
5388 
5389 
5390 
5391 
5392 

5393 



5394 
5395 
5396 
5397 
5398 
5399 



030730 

030730 004737 005344 

030734 004557 007324 

030740 003626 

030742 OOOOOO 

030744 103003 

030746 

030746 104460 

030750 

030750 104410 

030752 001120 

030754 004557 007754 

050760 000001 

030762 000007 

050764 004537 007754 

050770 OOOOOO 

050772 OOOOOO 

050774 004557 007622 

051000 OOOOOO 

051002 0O0010 

051004 103003 

051006 

0510O6 104460 

051010 

051010 104410 

031012 001060 

051014 004537 007622 

051020 000017 

031022 000010 

031024 105003 

031026 

031026 104460 



5BTTL TEST 7 -- BOP RX BIT STUfFING TEST 

+ 
* 

* 

* 

* 
* 

* 
* 
--* + ± + + ±* + + + + + 4. + *+ + + + + + + + + + + + + ** + * + * + + * + + + + + + + + * + A + + + * + + + + * + 4,*, + ++. + *4. + + + + 4 t +t± + 

BGNTST 

T7:: 
;INIT DMV-11, ENTER M-f OOP 

;L0AD 1 SOn, CLK TX UN* XL ACTIVE 
;SET BOP MOOE, SYNCH REG-226 
;USE 8 BIT CHARS 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TEST 7 -- 80P RX BIT STUFFING TEST 

THE USYRT IS INITIALIZED AND THE FOLLOWING TEXT IS TRANSMITTED 
(DELIMITED BY THE APPROPRIATE CONTROL CHARACTERS -- OF COURSE): 

000, 017, 056, 074, 170. 360, 037, 076, 174, 370. 077. 176. 374. 
177, 376, 377. 

NO IE THAT THIS PATTERN CONSISTS Of CHARACTERS WHICH REQUIRE BIT 
STUFFING BOTH INDIVIDUALLY ANO IN COMBINATION WITH ADJACENT 
CHARACTERS. THERE ARE ALSO CHARACTERS WHICH REQUIRE NO BIT STUFFING 
AT ALL. ALL 16 CHARACTERS ARE READ BY THE RECEIVER AND COMPARED AS 
THEY ARE MADE AVAILABLE AT RXDB. 



JSR 


PC.INIDMV 


JSR 


R5.INITRN 


NOCHKJ 


SYNCH 







BCC 


.-8. 


ERROR 





ESCAPE TST 



TRAP 

TRAP 
.WORD 



CIERROR 

CiESCAPE 
L 10036 -. 



JSR 


R5.TXCTRL 


TSOM 




7. 




JSR 


R5.TXCTRL 


000 









JSR 


R5.TXCHAR 


000 




8. 




BCC 


.♦8. 


ERROR 




ESCAPE 


TST 


JSR 


R5.TXCHAR 


017 




8. 




BCC 


.♦8. 


ERROR 





{LOAD 2N0 FLAG,TX 1ST FLAG 
{CLEAR TSOM 

j LOAD 000CDATA1). TX 2ND FLAG 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 017CDATA2), TX OOOCDATAl) 



;BR IF NO ERROR 
{REPORT STACKED ERROR 



TRAP 

TRAP 
.WORD 



C*ERROR 

CiESCAPE 
L 10036 -. 



TRAP 



C*ERROR 



1 



CNDMOMO DMV11 LINE UNI"! 0IAG2 MACRO M1200 
TEST 7 -- BOP RX BIT STUFFING TEST 



22 -FEB -84 15: 39 PAGE 70-1 



5400 



5401 
5402 
5403 
5404 
5405 
5406 

5407 



5408 
5409 
5410 
5411 
5412 
5413 

5414 



5415 
5416 
5417 
5418 
5419 

5420 



5421 
5422 
5423 
5424 
5425 
5426 
542? 

5428 



5429 
54 30 
5431 
5432 
5433 
5434 

5435 



54 36 
5437 
5438 
5439 



031030 
031030 
031032 

031034 
031040 
031042 
031044 
031046 
031046 
031050 
031050 
031052 

031054 
031060 
031062 
031064 
031066 
031066 
031070 
031070 
031072 

031074 
031100 
031102 
031104 
031104 
031106 
031106 
031110 

031112 
031116 
031120 
031122 
031124 
031126 
031126 
031130 
031130 
031132 

031154 
031140 

031142 
031144 
031146 
031146 
031150 
031150 
031152 

031154 
031160 
031162 



104410 
001040 

004537 
000036 
000010 
103005 

104460 

104410 
001020 

004537 
000074 
OOCOOO 
103003 

104460 

104410 
001000 

004537 
000000 
103003 

104460 

104410 
000762 

004537 
000400 
000000 
000010 
103003 

104460 

104410 
000740 

004537 
000170 
000000 
103003 

104460 

104410 
000720 

004537 
000017 
000000 



007622 



007622 



011310 



010034 



007622 



010034 



ESCAPE 


TST 


JSR 

036 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

074 



BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5,RCV1ST 

. »8. 


ESCAPE 


TST 


JSR R5.RXCHAR 

RXS0M!000 



8. 

bcc .♦a. 

ERROR 


ESCAPE 


TST 


JSR 

170 



BCC 

ERROR 


R5,TXCHAR 
,♦8. 


ESCAPE 


TST 


JSR 
017 



R5.RXCHAR 



I SKIP TO END Or TEST 



{LOAD 036CDATA3), TX 017CDATA2) 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO ENO OF TEST 



;LOAD 074CDATA4) 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CLOCK AND RCV OOO(DATAl) 

sBR IF NO ERROR 
{REPORT STACKED ERROR 

I SKIP TO ENO OF TEST 



TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



jREAD 6 CHK 000CDATA1), RCV 017CDATA2) 
{ £ CHECK RSOM-l 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



{LOAD 170CDATA5) 



;BR IF NO ERROR 
{REPORT STALKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



C$F,SCAPF 
L10036-. 



CSERROR 

CtESCAPE 
L10036-. 



CJERROR 

CiESCAPF 
L10036-. 



CJERROR 

C$ESCAPE 
L10030-. 



C$ERROR 

CJESCAPE 
L 10036 -. 



CiERROR 

CiESCAPE 
L 100 36-. 



SEQ 0138 



{READ/CHECK 017(DATA2) ,RCV 036CDATA3) 



CNDMDAO DMV11 LINE UNIT DIAG2 MACRO M1200 



,111. 

22 -FEB -84 15:39 PAGE 70-2 



TEST 7 

5440 
5441 
5442 

5443 



5444 
5445 
5446 
5447 
5448 
5449 

5450 



5451 
5452 
5453 
5454 
5455 
5456 
5457 

5458 



5459 
5460 
5461 
5462 
5463 
5464 

5465 



5466 
5467 
5468 
5469 
5470 
5471 
5472 

5473 



5474 

5475 
5476 
5477 
5478 
5479 

5480 



BOP RX BIT STUFFING TEST 



031164 
031166 

031170 
031170 
031172 
031172 
031174 

031176 
031202 
031204 
031206 
031210 
031210 
031212 
031212 
031214 

031216 
031222 
031224 
031226 
031230 
031232 
031232 
031234 
031234 
031236 

031240 
031244 
031246 
031250 
031252 
031252 
031254 
031254 
031256 

031260 
031264 
031266 
031270 
031272 
031274 
031274 
031276 
031276 
031300 

031302 
031306 
031310 
031312 
031314 
031314 
031316 



000010 
103003 

104460 

104410 
000676 

004537 
000360 
000000 
103003 

104460 

104410 
000656 

004537 
000036 
000000 
000010 
103003 

104460 

104410 
000634 

004537 
000037 
000000 
103003 

104460 

104410 
000614 

004537 
000074 
000000 
0OO010 
103003 

104460 

104410 

000572 

00453 7 
000076 
000000 
103003 

104460 



007622 



010034 



007622 



010034 



007622 



3. 

BCC 

ERROR 


,♦8. 


ESCAPE 


TST 


JSR 

360 



BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

036 



8. 

BCC 

ERROR 


R5,RXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

037 



BCC 

ERROR 


R5.TXCHAR 


ESCAPE 


TST 


JSR 

0/4 



8. 

BCC 

ERROR 


R5.RXCHAR 
.♦8, 


ESCAPE 


TST 


JSR 

076 



BCC 

ERROR 


R5.TXCHAR 
.+8. 


ESCAPE 


TST 



}BR IF NO ERROR 








, REPORT STACKED 


ERROR 










TRAP 


CiERROR 


{SKIP TO END OF 


TEST 










TRAP 


CiESCAPE 






.WORD 


L 10036 -. 



;LOAD 360CDATA6) 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 

.WORD 



{READ/CHECK 036CDATA3) ,RCV 074C0ATA4) 



;BR IF NO ERROR 

I REPORT STACKED ERROR 

jSKIP TO END OF TEST 



jLOAD 037CDATA7) 



;BR IF NO ERROR 

j REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



;READ/CHECK 074CDATA4 ) ,RCV 170CDATA5) 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 076CDATA8) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

i SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CiERROR 

CiESCAPE 
L 10036 -. 



C$ERROR 

CiESCAPE 
L 10036 -. 



CIERROR 

CIESCAPE 
L 10036 -. 



CiERROR 

CIESCAPF 
L 10036 -. 



5EQ 0139 



TRAP 



CiERROR 
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SEQ 0140 



031316 
031320 

031322 
031326 
031330 
031332 
031334 
031336 
031336 
031340 
031340 
031342 

031344 
031350 
031352 
031354 
031356 
031356 
031360 
031360 
031362 

031364 
031370 
031372 
031374 
0-J1376 
031400 
031400 
5503 031402 
031402 
031404 



5461 
5482 
5483 
5484 
5485 
5486 
5487 

5488 



5489 
5490 
5491 
5492 
5493 
5494 

5495 



5496 
5497 
5498 
5499 

550C 
5501 
5502 



5504 
5505 
5506 
550 7 
5508 
5509 

5510 



5511 
5512 
5513 
5514 
5515 
5516 
5517 

5518 



5519 
5520 



031406 
031412 
031414 
031416 
031420 
031420 
031422 
021422 
031424 

031426 

031432 
031434 

031436 
031440 
031442 
031442 
051444 
031444 
031446 



104410 
000552 

004537 
000170 
000000 
000010 
103003 

104460 

104410 
000530 

004537 
000174 
OOCOOO 
103003 

104460 

104410 
0O0510 

004537 
000360 
OOOOOO 
0O0010 
103003 

104460 

104410 
000466 

004537 
OO0370 
OOOOOO 
103003 

104460 

104410 
000446 

004537 
000037 
OOOOOO 
000014 
103003 

104460 

104410 
000424 



010034 



007622 



010034 



007622 



010034 



TRAP 
.WORD 



CJESCAPt 
L10036-. 



031450 00453 7 007622 



JSR 


R5,RXCHAP 


{READ/CHECK 170CDATA5), 


RCV 


360CDATA6) 




170 



8. 














BCC 


. *8. 


ibR IF NO ERROR 










ERROR 




{REPORT STACKED ERROR 






TRAP 


C$ ERROR 


ESCAPE 


TST 


iSKIP TO END OF TEST 






TRAP 
.WORD 


C$fcSCAPE 

L10036-, 


JSR 


RS.TXCHAR 


{LOAD 174CDATA9) 










174 
















BCC 


.♦8. 


j BR IF NO ERROR 










ERROR 




{REPORT STACKED ERROR 






TRAP 


CtERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 






TRAP 
.UORD 


C$ESCAPE 
L10036-. 


JSR 


R5.RXCHAR 


l READ/CHECK 360CDATA6), 


,RCV 


037CDATA7) 




360 















6. 














BCC 


.♦8. 


j BR IF NO ERROR 










ERROR 




{REPORT STACKED ERROR 






TRAP 


CiERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 




• ■ 


TRAP 
.WORD 


CSESCAPE 
L 10036 -. 


JSR 


R5.TXCHAR 


{LOAD 370CDATA1O) 










370 















see 


.+8. 


iBR IF NO ERROR 










ERROR 




{REPORT STACKED ERROR 






TRAP 


CIERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 






TRAP 
.UORD 


OESCAPE 
L 10036 -. 


JSR 


R5.RXCHAR 


jREAD/CHECK Q37CDATA7), 


,RCV 


076CDATA8) 




037 















12. 




{(EXTRA 4 TICKS FOR BIT-STUFF 


S FIFO) 




BCC 


.♦8. 


jBR IF NO ERROR 










ERROR 




{REPORT STACKED ERROR 






TRAP 


CJERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 






TRAP 
.WORD 


CSE5CAPE 
L 10036 -. 


JSR 


RS.TXCHAR 


iLOAD 077CDATA11) 











CNDMDAO DMV11 LINE UNIT DIAG2 MACRO M1200 
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5521 


031454 


00007 7 


5522 


031456 


oooooo 


5523 


031460 


103003 


5524 


031462 






031462 


104460 


5525 


031464 






031464 


104410 




031466 


000404 


5526 






5527 


031470 


004537 


5528 


031474 


000076 


5529 


031476 


OOOOOO 


5530 


031500 


000010 


5531 


031502 


103003 


5532 


031504 






031504 


104460 


5533 


031506 






031506 


104410 




031510 


000362 


5534 






5535 


031512 


004537 


5536 


031516 


000176 


5537 


031520 


OOOOOO 


5535 


031522 


103003 


5539 


031524 






031524 


104460 


5540 


031526 






031526 


104410 




031530 


000342 


5541 






554? 


031532 


004537 


5543 


031536 


000174 


5544 


031540 


OOOOOO 


5545 


031542 


000010 


5546 


031544 


103003 


5547 


031546 






031546 


104460 


5548 


031550 






031550 


104410 




031552 


000320 


5549 






5550 


031554 


004537 


5551 


031560 


000374 


5552 


031562 


OOOOOO 


5553 


031564 


103003 


5554 


031566 






031566 


104460 


5555 


031570 






031570 


104410 




031572 


00030O 


5556 






555/ 


031574 


004537 


5553 


031600 


000370 


5559 


031602 


OOOOOO 


5560 


031604 


000010 


5561 


031606 


103003 


5562 


031610 





010034 



007622 



010034 



007622 



010034 





L 1 J. 


22-FEB-84 


15:39 PAGE 70-4 


077 



BCC 

ERROR 


.♦8, 


ESCAPE 


TST 


JSR 

076 



8. 

BCC 

ERROR 


R5.RXCHAR 
,♦0. 


ESCAPE 


TST 


JSR 

176 


BCC 
ERROR 


R5,TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

174 



8. 

BCC 

ERROR 


R5.RXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

374 



BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

370 


8. 

BCC 
ERROR 


Rb.RXCHAR 
.♦8. 



j BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



{READ/CHECK 076( DATA8) ,RCV 174CDATA9) 



;BR IF NO ERROR 

I REPORT STACKED ERROR 

{SKIP TO END OF TEST 



;LOAD 176CDATA12) 



j BR IF NO ERROR 
{REPORT STACKED ERROR 

jSKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



I READ/CHECK 174CDATA9) ,RCV 370CDATA10) 



{ BR IF NO ERROR 
{RFiPORT STACKED ERROR 

j SKIP TO END OF TEST 



{LOAD 374CDATA13) 



{ BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



5EQ 0141 



C*ERROR 

Ci ESCAPE 
L10036-. 



C$ERROR 

CJESCAPE 
L 10036 -. 



CtERROR 

CiESCAPE 
L 10036 -. 



CIERPOR 

C*ESCAPE 
L10036-. 



C $ ERROR 

CJESCAPE 
L 10036 -, 



jREAD/CHECK 370CDATA10),RCV 077CDATA11) 



j BR IF NO ERROR 
iREPORT STACKED ERROR 
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5563 



5564 
5565 
5566 
5567 
5568 
5569 

5570 



5571 
5572 
5573 
5574 
5575 
5576 
5577 

5578 



5579 
5580 
5581 
5582 
5583 
5584 

5585 



5586 
5587 
5588 
5589 
5590 
5591 
5592 

5593 



5594 
5595 
5596 
5597 
5598 
5599 

5600 



5601 



031MC 

03^612 

031612 
031614 

031616 
031622 
031624 
031626 
031630 
031630 
031632 
031632 
031634 

031636 
031642 
031644 
031646 
031650 
031652 
031652 
031654 
031654 
031656 

031660 
031664 
031666 
031670 
031672 
031^72 
031674 
031674 
031676 

031700 
031704 
031706 
031710 
031712 
031714 
031714 
031716 
031716 
031720 

031722 
031726 
031730 
031732 
031734 
031734 
031736 
031736 
031740 



104460 

104410 
000256 

004537 
000177 

oooooo 

103003 

104460 

104410 
000236 

004537 
OOC077 
OOOOOO 
000014 
103003 

104460 

104410 
0O0214 

004537 
000376 
OOOOOO 
103003 

104460 

104410 
000174 

004537 
OO0176 
OOOOOO 
000010 
103003 

104460 

104410 
000152 

004537 
000377 
OOOOOO 
103003 

104460 

104410 
000132 



007622 



010034 



007622 



010034 



007622 



ESCAPE 


TST 


JSR 

177 



BCC 

ERROR 


R5.TXCHAR 

. ♦a, 


ESCAPE 


TST 


JSR 

077 



12. 

BCC 

ERROR 


R5.RXCHAR 
,*8. 


ESCAPE 


TST 


JSR 

376 



BCC 

ERROR 


R5.TXCHAR 
.♦8, 


ESCAPE 


TST 


JSR 

176 



8. 

BCC 

ERROR 


R5.RXCHAR 

.+8. 


ESCAPE 


TST 


JSR 

377 


BCC 
ERROR 


R5.TXCHAR 
.*8. 


ESCAPE 


TST 



jSKTP TO END OF TEST 



jLOAD 177CDATA14) 



;BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 



CSFRROR 



TRAP CiESCAPE 
.WORD L 10036 -. 



TRAP 



CtERROR 



TRAP CtESCAPE 
.WORD L 10036 -. 



jREAD/CHECK 077CDATA11 ) ,RCV 1/6CDATA12) 



{(EXTRA 4 TICKS FOR BIT-STUFF £ FIFO) 

j BR IF NO ERROR 

j REPORT STACKED ERROR 

TRAP 

{SKIP TO END OF TEST 

TRAP 
.WORD 

;LOAD 376CDATA15) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



{READ/CHECK 176CDATA12) ,RCV 374CDATA13) 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 377CDATA16) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CiERROR 

CiESCAPE 
L 10036 -. 



C $ ERROR 

CIESCAPE 
L 10036 -. 



CiERROR 

CiESCAPE 
L 10036 -. 



CiERROR 

CiESCAPE 
L 10036 -. 



SEQ 0142 



CNDMDAO DMVL1 LINE UMT DIAG2 
TEST 7 -- 80P RX BI r STUFF* ING TEST 



N '!. 1 

MACRO M1200 22 -FEB -84 10:3') PAGE 70-6 



SEQ 0143 



5602 
1)603 
5604 
5605 
5606 
5607 

5608 



5609 
5610 
5611 
5612 
5613 
5614 

5615 



5616 
5617 
5618 
5619 
5620 
5621 
5622 

5623 



5624 
5625 
5626 
5627 
5628 
5629 
5630 

5631 



5632 
5653 
5634 
5635 
5636 
5637 
5638 

5639 



5640 



031742 
031746 
031750 
031752 
031754 
031756 
031756 
031760 
031760 
031762 

031764 
031770 
031772 
031774 
031776 
031776 
032000 
032000 
032002 

032004 
032010 
032012 
032014 
032016 
032020 
032020 
032022 
032022 
032024 

032026 
032032 
032034 
032036 
032040 
032042 
032042 
032044 
032044 
032046 

032050 
032054 
032056 
032060 
032062 
032064 
032064 
032066 
032066 
032070 
032072 
032072 
032072 



00-037 

000374 
000000 
000010 
103003 

104460 

104410 
000110 

004537 
OOC002 
000000 
103003 

104460 

104410 
000070 

004537 
000177 
000000 
OOOCIO 
103003 

104460 

104410 
000046 

004537 
000376 
000000 
020014 
103003 

104460 

104410 
000024 

004537 
001377 

000000 
060000 
103003 

104460 

104410 
000002 



104401 



010034 



007734 



01Q0O4 



010034 



010034 



JSR 


R5,RXCHAR 


; READ/CHECK 374CDATA13) , 


,RCV 


177CDATA14) 




374 















8. 














BCC 


. *8. 


;BR IF NO ERROR 










ERROR 




{REPORT STACKED 


ERROR 




TRAP 


CJERROR 


ESCAPE 


TST 


{SKIP TO END OF 


TEST 




TRAP 
.WORD 


C$ ESCAPE 
L10036-. 


JSR 


RS.TXCTRL 


{LOAD 1ST TEOM 










TF.OM 



BCC 














. +8. 


{BR IF NO ERk.- 










ERROR 




{REPORT STACKED 


thKOR 




TRAP 


C$ERR0R 


ESCAPE 


TST 


{SKIP TO END OF 


TEST 




TRAP 
.WORD 


CSESCAPE 
L 10036 -. 


JSR 


R5.RXCHAR 


{READ/CHECK 177CDATA14), 


,RCV 


376CDATA15) 




177 



8. 














BCC 


, ♦fl. 


tBR IF NO ERROR 










ERROR 




{REPORT STACKED 


ERROR 









ESCAPE TST 



JSR 


R5.RXCHAR 


376 









NCRACT! 


tl2. 


BCC 


.*8, 


ERROR 





ESCAPE TST 



JSR R5.RXCHAR 

RXE0MJ377 



NFCRDAJNCRACT 

BCC .*8. 

ERROR 

ESCAPE TST 



TRAP 


CiERROR 


;SKIP TO END OF TEST 




TRAP 


CiESCAPE 


.WORD 


L10036-. 


{READ/CHECK 376CDATA15) ,RCV 377CDATA16) 




{DON'T CHECK FOR FINAL RXACT-1 




{(EXTRA 4 TICKS FOR BIT-STUFF/FIFO) 




jBR IF NO ERROR 




{REPORT STACKED ERROR 




TRAP 


C$ERR0R 


{SKIP TO END OF TEST 




TRAP 


CiESCAPE 


.WORD 


L10036-. 



ENDTST 



j READ/CHECK 377(DATA16^ 
{ 6 CHECK REOM 

{DON'T CHECK FOR FINAL RDA»RXACT»1 

{ BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

l SKIP TO END OF TEST 

TRAP 
.WORD 



L 10036; 



TRAP 



C$ERROR 

CiESCAPE 
L10036-. 



C$ETST 



CNOMOAO DMVtl LINE UNIT DIAGO 

TEST 8 - BOP RX UNDERRUN IDLt ABORTS/FLAGS 



U J c. 
MACRO M12O0 LV FfcB-84 1*3:39 PAGE 71 



5649 



.SBTTL TEST 8 



BOP RX UNDERRUN IDLE ABORTS/FLAGS 



SEQ 0144 



5650 

5651 



5652 
5653 

5654 
5655 
5656 
5657 
5658 

5659 



5660 
5661 

5662 
5663 
5664 
5665 
5666 
5667 
5668 
5669 
5670 
5671 
5672 

5673 



5674 
5675 
5676 
5677 
5678 
5679 

5680 



032074 

032074 
032074 
032074 
032076 

032102 
032106 
032110 
032112 
032114 
032114 
032116 
032116 
032120 

032122 
032126 
032130 
032132 
032136 
032140 

032142 
032146 
032150 
032152 
032154 
032154 
032156 
032156 
032160 

032162 

032166 
032170 
032172 
032174 
032174 
032176 
032176 



104402 
004737 

004537 
003626 
000000 
103003 

104460 

104410 
000300 

004537 
000001 
000007 
004537 
000000 
000000 

0O4537 
000123 
000010 
103003 

104460 

1O4410 
000240 

004537 
000321 
000010 
103003 

104460 
104410 



005344 
007324 



007734 

007734 

007622 



007622 



♦ ♦ 

* 

* 



TEST 8 -- BOP RX UNDERRUN IDLE ABORTS/FLAGS 

THE USYRT IS INITIALIZED ANO A MESSAGE IS STARTF/D, THEN. A 
TRANSMITTER UNOERRUN IS FORCED WITH IDLE - - CAUSING ABORT 
CHARACTERS TO BE IDLED. THE RECEIVER SHOULD BE RESET BY THE ABORT 
CHARACTER(S). VERIFY THAT RAB'GA BIT-1, 
REPEAT THE ABOVE WITH IDLE-1. 



BGNTST 



T8: i 



BGNSU8 




T8.1: 


TRAP 


CtBSUB 


JSR 


PC.INIDMV 


INIT DMV-11, ENTER M-LOOP 






JSR 


R5.INITRN 


iLJ^ « SOU. CLK TX UNTIL ACTIVE 




NOCHK! SYNCH 


i SET BOP NODE. SYNCH REG-226 











tUSE 8 BIT CHARS 






BCC 


.♦8. 


iBR IF NO ERROR 






ERROR 




jREPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


sue 


l SKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPE 
L10040-. 


JSR 


R5.TXCTRL 


lLOAD 2N0 FLAG,TX 1ST FLAG 






TSOM 

7 

JSR 










R5.TXCTRL 


iCLEAR TSOM 






000 











JSR 


R5.TXCHAR 


lLOAD 123CDATA1), TX 2ND FLAG 






123 
8. 










BCC 


.♦8. 


iBR if NO ERROR 






ERROR 




iREPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


SL« 


j SKIP TO END OF TEST 


TRAP 

.WORD 


C IE SCAPE 
L 10040 -, 


JSR 


R5.TXCHAR 


lLOAD 32HDATA2), TX U3(DATAl) 






321 










8. 










BCC 


,♦8. 


iBR IF NO ERROR 






ERROR 




jREPORT STACKED ERROR 


TRPP 


CIERROR 


ESCAPE 


S^ 


iSKIP TO END OF TEST 


TRAP 


CIESCAPE 



CNDHOAO DMV11 LINE UNIT DIAG2 MACRO Ml 200 
TEST 8 -- BOP RX UNDERRUN IDLE ABORTS/FLAGS 



Cl.,' 
2,? FEB -84 15:39 PAGfc 71 1 



SEQ 0145 



032200 000220 



.WORD L 10040 . 



5681 














5682 032202 


00453? 


007622 


JSR 


R5.TXCHAR 


lLOAD 000CDATA3), TX 321CDATA2) 




5683 032206 


oooooo 




000 








5684 032210 


ooooio 




8. 








5685 032212 


105003 




BCC 


.♦8. 


iBR If NO ERROR 




5686 032214 






ERROR 




jRFPORT STACKED ERROR 




032214 


104460 








TRAP 


CIERROR 


5687 032216 






ESCAPE 


SUB 


j SKIP TO ENO Of TEST 




032216 


104410 








TRAP 


CIESCAPE 


032220 


000200 








.WORD 


L 10040 -, 


5688 














5689 032222 


004537 


011310 


JSR 


R5.RCV15T 


1 CLOCK ANO RCV 123CDATA1) 




5690 032226 


OOOOOO 













5691 032230 


103003 




BCC 


.♦8. 


iBR IF NO ERROR 




5692 032232 






ERROR 




jREPORT STACKED ERROR 




032232 


104460 








TRAP 


CIERROR 


5693 032234 






ESCAPE 


sue 


iSKIP TO ENO OT TEST 




052254 


104410 








TRAP 


CIESCAPE 


052256 


000162 








.WORD 


L10O40-. 


5694 














5695 052240 


004537 


010034 


JSR 


R5.RXCHAR 


»READ C CHK 125(0ATA1), RCV 32KDATA2) 




5696 052244 


000523 




RXS0mi23 


j 6 CHECK RSOM-1 




5697 052246 


OOOOOO 













5698 052250 


OOOOIO 




8, 




1 8 TICKS OT THE CLOCK 




5699 032252 


103003 




BCC 


.♦8. 


I BR If NO ERROR 




5700 052254 






ERROR 




jREPORT STACKED ERROR 




052254 


104460 








TRAP 


CIERROR 


5701 032256 






ESCAPE 


SUB 


iSKIP TO ENO OT TEST 




052256 


104410 








TRAP 


CIESCAPE 


052260 


000140 








.WORD 


L10O40-. 


5702 














5703 052262 


004537 


005356 


JSR 


R5.CKUSTS 


!♦♦• CHECK fOR TXU-1 (6 S/f»0) ♦♦♦ 




5704 052266 


000556 




RDA!TBMT!RXACT!TXU!TSO!TXACT 




5705 052270 


105003 




BCC 


.*a. 


j BR IE NO ERROR 




5706 052272 






ERROR 




jREPORT STACKED ERROR 




052272 


104460 








TRAP 


CiERROR 


5707 052274 






ESCAPE 


sue 


iSKIP TO ENO Of TEST 




052274 


104410 








TRAP 


CIESCAPE 


032276 

5708 


000122 








.WORD 


L 10040 -. 


5709 032500 


004537 


010034 


JSR 


R5.RXCHAR 


, READ/CHECK 321(DATA2),DATA3 LOST,.,. 




5710 0525O4 


0OO521 




321 








5711 032506 


OOOOOO 













5712 052310 


060010 




NTCRDA! 


NCRACTS8. 


jNO CHECKING Of RDA 




5713 032312 


105003 




BCC 


,♦8. 


iBR If NO ERROR 




5714 032314 






ERROR 




I REPORT STACKED ERROR 




032314 


104460 








TRAP 


CIERROR 


5715 052516 






ESCAPE 


sue 


jSKIP TO ENO Of TEST 




052316 


104410 








TRAP 


CtESCAPE 


032320 


OOOIOO 








.WORD 


L10O40-. 


5716 














5717 032522 


004537 


003534 


JSR 


R5.RF.ADI 


jREAD RECEIVER STATUS REGISTER 




5718 052526 


120401 




RDSRH 








5719 032330 


OOOOOO 




Ui 000 




i* RESULTS GO HERE 




5720 032332 


132737 


000004 032330 


B1TB 


♦RABGA.l* 


!♦♦» CHECK If RA8/GA BI T ■ 1 ♦ ♦ • 




5721 032340 


001006 




BNE. 


10* 


iBR If BIT SET (IE; If OK) 





.)! 



CNDMOAO OMV11 LINE UNIT DIAG2 MACRO M1POO 22-rEB-64 15:39 PAGE /I 

TEST 8 - BOP RX UNDERRUN IDLfc ABORTS/FLAGS 



5722 052342 






032342 


104455 




032344 


000060 




032346 


014734 




032350 


021714 




5723 032352 






032352 


104410 




032354 


000044 




5724 032356 


132737 


000002 032330 


5725 032364 


001006 




5726 032366 






032366 


104455 




032370 


000061 




032372 


014537 




032374 


021714 




5727 032376 






032376 


104410 




032400 


000020 




5728 






5729 032402 


004537 


005356 


5730 032406 


000116 




5731 032410 


103003 




5^32 032412 






032412 


104460 




5733 032414 






032414 


104410 




032416 


000002 




5734 032420 






032420 






032420 


104403 




5735 






5736 032422 






032422 






032422 


104402 




5737 032424 


004737 


005344 


5738 






5739 032430 


004537 


007324 


5740 032434 


007626 




5741 032436 


OOOOOO 




5742 032440 


103003 




5743 032442 






032442 


104460 




5744 032444 






032444 


104410 




032446 


000242 




5745 






5746 032450 


004537 


007734 


5 747 032454 


000001 




5748 032456 


0OOO07 




5749 032460 


004537 


007734 


5750 032464 


OOOOOO 




5751 032466 


OOOOOO 




5752 






5753 032470 


004537 


007622 


5754 032474 


000123 





GEDF 



EM40,ERR12 



10$: 



ESCAPE SUB 



BITB *RE0M,1$ 

BNE 15$ 

GEDF EM31.ERR12 



15$; 



ESCAPE SUB 



JSR R5.CKUSTS 
TBMT!TSO!TXACmXU 
BCC ,*8. 
ERROR 

ESCAPE SUB 



ENOSUB 



BGNSUB 



JSR 



SUBTEST * 2 



PC.INIDMV 



JSR R5.INITHN 

IDLES JNOCHK! SYNCH 



BCC 4 *8, 

ERROR 

ESCAPE SUB 



JSR 

TSOM 

7. 

JSR 

000 



JSR 
123 



R5.TXCTRL. 
R5.TXCTRL 

RS.TXCMAR 



j** REPORT RAB/GA BIT NOT SET!!! 

I "DEVICE FATAL" ERROR 48 

TRAP 
.WORD 

.WORD 
.WORD 



!♦♦ AND EXIT TEST 



!»♦♦ CHECK FOR RXEOM BIT • 1 ♦♦♦ 
»BR IF BIf SET (IE: IF OK) 
!♦* REPORT REOM BIT NOT SET!!! 
j "DEVICE FATAL" ERROR 49 



TRAP 
.WORD 



jLGAD 1 SOU, CLK TX UNTIL ACTIVE 
jSET BOP MOOE, IDLE -1, SYNCH REG-226 
lUSE 8 BIT CHARS 
j BR IF NO ERROR 
jREPORT STACKED ERROR 



iSKIP TO ENO OF TEST 



lLOAD 2N0 FLAG.TX 1ST FLAG 



TRAP 

TRAP 
.WORD 



j CLEAR TSOM 



jLOAD 123CDATA1J. TX 2ND FLAG 



CtERDF 
48 

EM40 
ERR12 

CIE5CAPE 
1.10040- f 







TRAP 


CiFRDF 






.WORD 


49 






.WORD 


EM31 






.WORD 


ERR12 


j** ANO EXIT TEST 












TRAP 


CJESCAPE 






.WORD 


L10040-. 


!♦• CHECK USYRT STATUS ♦♦ 








i BR IF NO ERROR 








jREPORT STACKED ERROR 












TRAP 


CfERROR 


jSKIP TO ENO OF TEST 












TRAP 


CIESCAPE 






.WORD 


L10040-. 


L10040: 








2; 


TRAP 


C$ESUB 


T8. 








TRAP 


C$BSUB 


lINIT DMV-11, ENTER M-LOOP 









C$ERROR 

CtESCAPE 
L10O41-. 



SEQ 0146 



CNDMOAO DMVil LINE UNIT DT.AG2 MACRO M120O 
TEST 8 -- BOP RX UNDERRUN IDLE ABORTS/FLAGS 



5 755 


032476 


0000 10 


5756 


032500 


103003 


5757 


032502 






032502 


104460 


5758 


032504 






032504 


104410 




032506 


000202 


5 759 






5760 


032510 


004537 


5761 


032514 


000321 


5762 


032516 


000010 


5763 


032520 


103003 


5764 


032522 






032522 


104460 


5765 


032524 






032524 


104410 




0J2526 


OOC162 


5766 






5767 


032530 


004537 


5768 


032534 


000000 


5 769 


032536 


000010 


5770 


032540 


103003 


5771 


032542 






032542 


104460 


5772 


032544 






032544 


104410 




032546 


000142 


5773 






5774 


032550 


00453 7 


5775 


032554 


000000 


5776 


032556 


103003 


5777 


032560 






032560 


104460 


5778 


032562 






032562 


104410 




032564 


000124 


5779 






5780 


032566 


004537 


5781 


032572 


000523 


5782 


032574 


000000 


5783 


032576 


000010 


5784 


012600 


103OO3 


5785 


032602 






032602 


104460 


5786 


032604 






032604 


104410 




032606 


000102 


5787 






5788 


032610 


004537 


5789 


032614 


000321 


5790 


032616 


000000 


5791 


032620 


020010 


5792 


032622 


103003 


5793 


032624 






032624 


104460 


5794 


032626 






032626 


104410 



007622 



007622 



011310 



010034 



010034 





r.u> 


22 -FEB -84 


15 j 39 PAGE 71-3 


8. 

BCC 
ERROR 


.♦8, 


ESCAPE 


SUB 


JSR 

321 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


SUB 


JSR 

000 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


SUB 


JSR 


BCC 
ERROR 


R5.RCV1ST 
.♦8. 


ESCAPE 


SUB 


JSR R5.RXCHAR 

RXS0M»123 



8. 

BCC , *8. 

ERROR 


ESCAPE 


SUB 


JSR 

321 



NCRACT! 

BCC 

ERROR 


R5,RXCHAR 
!8. 


ESCAPE 


sue 



iBR IF NO ERROR 






{REPORT STACKED ERROR 








TRAP 


CJERROR 


j SKIP TO END OF TEST 








TRAP 


CIESCAPE 




.WORD 


L10041-. 



;LOAD 321CDATA2). TX 123CDATA1) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

I SKIP TO END OF TEST 



lLOAD O00CDATA3), TX 32KDATA2) 



iBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



{CLOCK ANO RCV 123CDATA1) 

{BR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.UORD 



{READ 6 CHK 123CDATA1), RCV 321CDATA2) 
I 6 CHECK RSOM-1 



{ 8 TICKS OF THE CLOCK 
{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



TRAP 

TRAP 
.WORD 



{READ/CHECK 321CDATA2) ,RCV 000CDATA3) 



{DON'T CHECK FOR FINAL RXACT-1 
j BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



TRAP 
TRAP 



CtERROR 

CJESCAPE 
L10041-. 



C* ERROR 

CiESCAPE 

L10041-. 



CJERROR 

CIESCAPE 
L10041-, 



CIERROR 

CJESCAPE 
L10041-. 



C J ERROR 
CIESCAPE 



SEQ 0147 



CNDMOAO DMV11 LINE UNIT DIAG2 
TEST 8 -- BOP RX UNDERRUN IDLE 



MACRO M1200 
ABORTS/FLAGS 



032630 000060 



5795 
5796 
5797 
5796 
5799 

5600 



5801 
5802 
5803 
5804 
5805 
5806 
5807 

5808 



5809 
5810 
5811 
5812 
5813 

5814 



5815 
5816 



032632 
032636 
032640 
032642 
032642 
032644 
032644 
032646 

032650 
032654 
032656 
032660 
032662 
032664 
032664 
032666 
032666 
032670 

032672 
032676 
032700 
032702 
032702 
032704 
032704 
032706 
032710 
032710 
032710 
032712 
032712 
032712 



00453 7 005356 

000336 

103003 

104460 

104410 
000042 

004537 010034 

001000 

000000 

060010 

103003 

104460 

104410 
0OO020 

004537 005356 

000116 

103003 

104460 

104410 
000002 



104403 



22-TEB-84 15:39 
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.WORD L10041-, 



JSR R5,CKUSTS ?♦♦♦ CHECK FOR TXU-1 *♦* 
RDA ! TBMT }RSA » TSO! TXACT ! TXU 



BCC 
ERROR 



.♦8. 
ESCAPE SUB 



JSR R5.RXCHAR 

RXEOKSOOO 



NFCRDAJNCRACT18. 

BCC . *8, 

ERROR 

ESCAPE SU8 



JSR R5 # CKUSTS 
TBMT!TSO!TXACT»TXU 

bcc .*e. 

ERROR 
ESCAPE SUB 



ENDSltf 
ENDTST 



{BR IF NO ERROR 








I REPORT STACKED 


ERROR 










TRAP 


C TERROR 


I SKIP TO END OF 


TEST 










TRAP 


CJESCAPE 






.WORD 


L10041-. 



jREAD/CHECK O0OCDATA3) 
{ 6 CHECK REOM 

{DON'T CHECK FOR FINAL RDA-RXACT-1 
j BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



; f * CHECK USYRT STATUS 

{BR IF NO ERROR 

{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CSERROR 

CfESCAPE 
L10041-. 



104401 





TRAP 


C $ERROR 




TRAP 
.WORD 


OESCAPE 
L10041-. 


L 10041: 


TRAP 


C*ESUB 


L10037: 


TRAP 


CfETST 



SEQ 0148 



G'l J 



C 
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5EQ 0149 



5824 
5825 
5826 
5827 
582e 
5829 
5830 
5831 

5832 



5833 
5834 
5835 
5836 
5837 
5838 
5839 
5840 
5841 
5842 
5843 
5B44 
5845 

5846 



5847 
5648 
5549 
5850 
5851 
5852 

5853 



5854 
5855 
5856 
5857 



032714 

032714 

032720 
032724 
032726 
032730 
032732 
032732 
032734 
032734 
032736 

03274C 
032744 
032746 
032750 
032754 
032756 

032760 
032764 
032766 
032770 
032772 
032772 
032774 
032774 
032776 

033000 
033004 
033006 
033010 

033012 
033012 
033014 
033014 
033016 

033020 
033024 
033026 



004737 

0O4537 
007626 
000000 
103003 

104460 

104410 
000216 

004537 
OOOOOl 
000007 
004537 
000000 
OOOOOO 

0O4537 
000123 
000010 
103003 

104460 

104410 
000156 

0O4537 
000321 
OOOOIO 

103003 

104460 

104410 
000136 

004537 
OOOOOO 
000010 



.SBTTL TEST 9 - - BOP RX LOST RXE TEST 

+ »**. + ** + ***** + + *********** ***********♦** ++*** + + + + ******* + ** + * + *** + * + + *** + * + ** 

* 

* TEST 9 -- BOP RX LOST RXE TEST 
+ 

* THE USYRT 15 INITIALIZED AND A MESSAGE IS STARTED. WHILE IN THE 

* MIDDLE OF TEXT, RXE IS DROPPED AND THE REACTION OF THE RECEIVER IS 

* MONITORED. 



005344 
007324 



007734 
007734 

007622 



007622 



BGNTST 



JSR 


PC.INIDMV 


JSR R5.INITRN 

IDLES INOCHK! SYNCH 



BCC . *8. 

ERROR 


ESCAPE 


TST 


JSR 

TSOM 

7. 

JSR 

000 




R5,TXCTRL 
R5.TXCTRL 


JSR 

123 

8. 

BCC 

ERROR 


R5.TXCHAR 
.*8. 


ESCAPE 


TST 


JSR 

321 

8. 

BCC 

ERROR 


R5.TXCHAR 
,♦8. 


ESCAPE 


TST 


JSR 
000 

a. 


R5.TXCHAR 



T9: : 

{INIT DMV-11, ENTER M-LOOP 

;LOAO 1 SOM, CLK TX UNTIL ACTIVE 
iSET BOP MODE. IDLE -1, SYNCH REG«226 
{USE 8 BIT CHARS 
i BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 

{LOAD 2ND FLAG.TX 1ST FLAG 
{CLEAR TSOM 

{LOAD 123CDATA1), TX 2N0 FLAG 



I BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 321CDATA2), TX 123CDATA1) 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



{LOAD 000C0ATA3), TX 32HDATA2) 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CiERROR 

CIESCAPE 
L 10042 -. 



C TERROR 

CiESCAPE 
L 10042 -. 



C IERROR 

CJESCAPE 
L 10042 -. 



CNDMDAO DMVU LINf; UNIT DIAG2 
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SEQ 0150 



5858 


033030 


103003 


5059 


033032 






033032 


104460 


5860 


033034 






033034 


104410 




033036 


000116 


5861 






5862 


033040 


004537 


5863 


033044 


000000 


5864 


033046 


103003 


5865 


033050 






C33050 


104460 


5866 


033052 






033052 


104410 




033054 


000100 


5867 






5868 


033056 


004537 


5869 


033062 


000523 


5870 


033064 


000000 


5871 


033066 


O00O10 


5872 


033070 


103003 


5873 


033072 






033072 


104460 


5874 


033074 






033074 


104410 




033076 


000056 


5875 






5876 


033100 


00^537 


5877 


033104 


120000 


5878 


033106 


000072 


5879 






5880 


033110 


004537 


5681 


033114 


000116 


5882 


033116 


103003 


5883 


033120 






033120 


104460 


5884 


033122 






033122 


104410 




033124 


000030 


5885 






5866 


033126 


004537 


5887 


033132 


000001 


5888 


033154 


000010 


5889 






5890 


033136 


004537 


5891 


033142 


000104 


5892 


033144 


103003 


5893 


033146 






033146 


104460 


5894 


033150 






033150 


104410 




033152 


000002 


5895 


033154 
033154 






033154 


104401 



011310 



010034 



003660 



005356 



007734 



005356 



BCC 


. *8. 


;BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CJEPROR 


ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 
.WORD 


CJESCAPF 
L 10042^. 


JSR 



BCC 


R5.RCV1ST 


{CLOCK AND RCV 123CDATA1) 






.+8. 


} BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


C TERROR 


ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPE 

L 10042 -. 


JSR 


R5.RXCHAR 


{READ 6 CHK 123CDATA1), RCV 


321CDATA2) 




RXSOM!: 



8, 


123 


{ £ CHECK RSOM-1 








j 8 TICKS OF THE CLOCK 






BCC 


.♦8. 


j BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 











TRAP 


CSERROR 




ESCAPE TST 


;SKIP TO END OF TEST 








TRAP 


CJESCAPE 






.WOPD 


L 10042 -. 


• 


JSR R5.WRITEI 

VIAORB 

TXEN!DTR!RTSNO!TTLOOP 


{DROP RECEIVER ENABLE (RXEN) 






JSR R5.CKUSTS 


;♦♦♦ CHECK USYRT STATUS REGISTER *f* 






TBMTHSOJTXACTJTXU 








BCC .+8. 


j BR IF NO ERROR 






ERROR 


{REPORT STACKED ERROR 








TRAP 


CJERROR 




ESCAPE TST 


{SKIP TO END OF TEST 








TRAP 


CJESCAPE 






.WORD 


L 10042 -. 



ENDTST 



JSR R5.TXCTRL 

TSOM 

8. 


{LOAD 2ND FLAG.TX 1ST FLAG 




JSR R5.CKUSTS 
TBMT'TXACT 
BCC . *8. 
ERROR 

ESCAPE TST 


;♦♦♦ CHECK USYRT STATUS REGISTER ♦♦♦ 

j BR IF NO ERROR 

{REPORT STACKED ERROR 

TR.V 

{SKIP TO END OF TEST 

TRAP 
.WORD 

L10042: 


C TERROR 

CSESCAPE 

L 10042 -. 



TRAP 



C$ETST 
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5904 
5905 
5906 
5907 
5908 
5909 
5910 

5911 



5912 
5913 
5914 
5915 
5916 
5917 
5918 
5919 
5920 
5921 
5922 
5923 
5924 

5925 



5926 
5927 
5928 
5929 
5930 
5931 

5932 



5933 
5934 
5935 
5936 



033156 
033156 

033162 
033166 
033170 
033172 
033174 
033174 
033176 
033176 
033200 

033202 
033206 
033210 
033212 
033216 
033220 



033226 
033230 
033232 
033234 
033234 
033236 
033236 
033240 

033242 
033246 
033250 
033252 

033254 
033254 
033256 
033256 
033260 

033262 
033266 
033270 



004737 

004537 
023400 
000000 
103003 

104460 

104410 
000216 

004537 
000001 
000007 
004537 
000000 
000000 

004537 
000123 
000010 
103003 

104460 

104410 
000156 

004537 
000321 

000010 
103003 

104460 

104410 
000136 

004537 
000000 
000010 



005344 
007324 



007734 
C07734 

007622 



007622 



BOP RX GA (GO-AHEAD) RECOGNITION 



(.1**-* + + *** + ***+*+******************** + + *** + ** + * + **** + ****** + + ****** + **** + *** + 
* 

* TEST 10 -- BOP RX GA (GO-AHEAD) RECOGNITION 

* A SHORT MESSAGE IS TRANSMITTED FOLLOWED BY A GA CHARACTER (INSTEAD 

* OF A FLAG CHARACTER). THE RECEIVER IS OBSERVED FOR PROPER HANOLING 

* OF BOTH THE MESSAGE AND THE GA CHARACTER. THE RAB/GA STATUS BIT 
+ SHOULD BE SET Bt THE RECEIVER UPON RECOGNITION OF THE GA CHARACTER. 

--++ ********<> ******** **** A +****+&*+ ******* **** + **** + * + **** + ******4<* ********** 



BGNTST 
JSR 



PC.INIDMV 



JSR R5.IN1TRN 

STRIPSJNOCHK 



BCC ,*8. 

ERROR 

ESCAPE TST 



TlOj j 
jINIT DMV-11, ENTER M-LOOP 

jLOAO 1 SOM, CLK TX UNTIL ACTIVE 

;SET BOP MODE, NO ERROR CHECKING, SS/GA-1 

;USE BIT CHARS 

;BR IF NO ERROR 

j REPORT STACKED ERROR 



{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C TERROR 

CSESCAPE 
L10043-. 



007622 



JSR 


R5.TXCTRL 


{LOAD 2ND FLAG.TX 1ST FLAG 






TSOM 
7. 










JSR 


R5.TXCTRL 


{CLEAR TSOM 






000 











JSR 


R5.TXCHAR 


{LOAD 123(0 AT AD, TX 2ND FLAG 






123 










8. 










BCC 


.►8. 


j BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


C 5 ERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CSESCAPE 
L 10043 -. 


JSR 


R5.TXCHAR 


{LOAD 32KDATA2), TX 123CDATA1) 






321 










8. 










BCC 


.♦8, 


iBR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CiERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CJESCAPE 
L10043-. 


JSR 


R5.TXCHAR 


{LOAD 000(DATA3). TX 321CDATA2) 






000 










8. 











SEQ 0151 
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5937 
5938 

5939 



5940 
5941 
5942 
5943 
5944 

5945 



5946 
5947 
5946 
5949 
5950 
5951 
5952 

5953 



5954 
5955 
5956 
5957 
5958 
5959 
5960 
5961 
5962 
5963 
5964 

5965 



5966 
5967 
5966 
5969 
5970 
5971 
5972 

5973 



5974 



023272 
033274 
033274 
033276 
033276 
033300 

033302 
033306 
033310 
033312 
033312 
033314 
033314 
033316 

033320 
033324 
033326 
033330 
033332 
033334 
033334 
033336 
033336 
033340 

033342 
033346 
033350 

033352 
033356 
033360 
033362 
033364 
033366 
033366 
033370 
033370 
033372 

033374 
033400 
033402 
033404 
033406 
033410 
033410 
033412 
033412 
033414 
033416 
033416 
033416 



103003 

104460 

104410 
000116 

004537 
000000 
103003 

104460 

104410 
000100 

004537 
000523 
000000 
000010 
103003 

104460 

104410 
000056 

004537 
000012 
000000 

004537 
000321 
OOOOOO 
020010 
103003 

104460 

104410 
0O0024 

0O4537 
00300O 
OOOOOO 
060000 

103003 

104460 

104410 
000002 



104401 



011310 



010034 



007734 



010034 



010034 



RECOGNITION 








BCC 
ERROR 


. *8. 




ESCAPE 


TST 




JSR 


PCC 
ERROR 


R5.RCV1ST 
.♦■3. 




ESCAPE 


TST 




JSR R5 t RXCHAR 

RXS0MJ123 



8. 

BCC ,+Q. 

ERROR 




ESCAPE 


TST 




JSR R5.TXCTRL 

TEOMJTGA 






JSR 

321 



NCRACT! 

BCC 

ERROR 


R5.RXCHAR 
.♦8v 




ESCAPE 


TST 




JSR 

RXA8GA! 



NFCRDA! 

BCC 

FRROR 


R5.RXCHAR 
!RXE0M!O0O 

! NCRACT 
.♦8. 




ESCAPE 


TST 



}BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CLOCK AND RCV 123CDATA1) 

{BR IF NO ERi<OR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



{READ C CHK 123CDATA1), RCV 32KDATA2) 
i 6 CHECK RSOM-1 

5 8 TICKS OF THE CLOCK 
j BR IK NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



{SET TEOM AND TGA 



TRAP 

TRAP 
.WORD 



{READ/CHECK 32KDATA2) ,RCV 0OOCDATA3) 



{DON'T CHECK FOR FINAL RXACT-1 
{BR IF NO ERROR 
{REPORT STACKEO ERROR 

{SKIP TO END OF TEST 



{READ/CHECK 000CDATA3) 
{VERIFY REOM £ RABGA » 



TRAP 

TRAP 
.WORD 



{DON' r CHECK FOR FINAL RDA-RXACT-1 
{BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



ENDTST 



L10043: 



TRAP 

TRAP 
.WORD 



TRAP 



CfERROR 

CiESCAPE 
L10043-, 



C TERROR 

CiESCAPE 
L 10043 -. 



C TERROR 

CIESCAPE 
L 10043 -. 



CiERROR 

CiESCAPE 
L10043-. 



C TERROR 

CiESCAPE 
L 10043 -. 



CiETST 



SEQ 0152 
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SEQ 0153 



.5BTTL TEST 11 -- BOP RX "ABC" TEST 



5989 
5990 
5991 
5992 
5993 
5994 



5995 

5996 
5997 
5998 
5999 
6000 
6001 
6002 

6003 



6004 
6005 
6006 
6007 
6008 
60O9 
6010 
6011 
6012 
6013 
6014 
6015 
6016 

6017 



033420 
033420 
033424 



033430 
033430 
033430 
033432 
033440 

033446 
033452 
033454 
033456 
033460 
033460 
033462 
033462 
033464 

033466 
0334 72 
03:34 74 
033476 
033502 
033504 

033506 
033512 
033514 
033516 

033520 
033520 
033522 
033522 



004737 005344 
012704 000001 



104402 
116437 
116437 

004537 

O03626 
OOOOOO 
103003 

104460 

104410 
OO0352 

004537 
OCOOOl 
000007 

O04537 
OOOOOO 
OOOOOO 

004537 
000123 
000010 
103003 

104460 

104410 



034056 
034066 

007324 



007734 
007734 

007622 



034020 
033574 



* 

TEST 11 -- BOP RX "ABC" TEST 



THIS TEST IS COMPOSED OF 7 SUBTESTS -- EACH ONE CHECKING A DIFFERENT 
EXPECTED VALUE IN ABC (THE 3 BIT "ASSEMBLED BIT COUNT" FIELD WITHIN 
RDSR). IN EACH SU6TEST THE UbYRT IS INITIALIZED AND A SMALL MESSAGE 
IS STARTED. THE LAST CHARACTER IS SENT UITH ITS LENGTH BEING 
SPECIFIED FIRST AS 1 BIT, THEN AS 2 BITS. THEN AS 3 BITS, ETC, IN THE 
TRANSMITTER SIDE OF THE USYRT. IN ALL CASES THE RECEIVER IS LEFT SET 
TO 8 BITS IN LENGTH AND WHEN THE FLAG CHARACTER IS DETECTED, ABC IS 
CHECKED AND SHOULD MATCH TXCL. ERROR LOOPING WILL BE ON THE FAILING 
SUBTEST. 

- ** ** * * * * * * + * * ** *** ** * * * * * * * * * * ** * * * * ** * * * * * * * * * * ** * * * *.* + * ****************** 

BGNTST 

Til:: 
JSR PCINIDMV ;INIT DMV-11. ENTER M-LOOP 
MOV #1,R4 jINIT GENERAL PURPOSE INDEX 



1 



; MAIN PROGRAM LOOP 
T9.LP: BGNSUB 



MOVB TABLRCR4),30$ 

MOVB LNTBLCR4) # 5* 

JSR R5.INITRN 

NOCHK! SYNCH 



BCC . *8. 

ERROR 

ESCAPE SU? 



Tll.l: 

TRAP CtBSUB 
j SET UP EXPECTED FINAL VALUE 
{SET UP FINAL TX CHAR LENGTH (1 -> 8 BITS) 

{LOAD 1 SOM, CLK IX UNTIL ACTIVE 

;SET BOP MODE, SYNCH REG-226 

j USE 8 BIT CHARS 

}BR IF NO ERROR 

j REPORT STACKED ERROR 



JSR 


R5.TXCTRL 


TSOM 




7. 




JSR 


R5.TXCTRL 


000 









JSR 


R5.TXCHAR 


123 




8. 




OCC 


.♦8. 


ERROR 




ESCAPE 


$<B 



j SKIP TO END OF TEST 



{LOAD 2ND FLAG.TX 1ST FLAG 



TRAP 

TRAP 
.WORD 



CSERROR 

C$ESCAPE 
L 10045 -. 



{CLEAR TSOM 



{LOAD 123CDATA1), TX 2ND FLAG 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 
TRAP 



CJERROR 
CSESCAPfc 
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033524 00031? 



6018 
6019 
6020 
6021 
6022 
6023 

6024 



6025 
6026 
6027 

6028 
6029 
6030 

6031 



6032 
6033 
6034 
6035 
6036 
6037 
6038 
6039 
6040 
6041 

6042 



6043 
6044 
6045 
6046 
6047 
6048 
6049 
6050 
6051 
6052 
6053 
6054 
6055 

6056 



6057 
6058 
6059 
6060 
6061 



033526 
033532 
033534 
033536 
033540 
033540 
033542 
033542 
033544 

033546 
033552 
033554 
033556 
033560 
033560 
033562 
033562 
033564 

033566 
033572 
033574 

033576 
033602 
033604 
033606 
033610 
033610 
033612 
033612 
033614 

033616 
033622 
033624 
033626 
033632 

033634 
033640 
033642 
033644 
033646 
033650 
033650 
035652 
033652 
033654 

033656 
033662 
033664 

033666 



004537 
000321 
000010 
103003 

104460 

104410 
000272 

004537 
000000 
000010 
103003 

104460 

104410 
000252 

004537 
120407 
000000 

004537 

000377 
000010 
103003 

104460 

104410 
000222 

0O4537 
000002 
OOOO20 
0O4537 
000040 

004537 
000523 
OOOOOO 
10OOO0 
103003 

104460 

104410 
000162 

00453 7 
000321 
OOOOOO 
120000 



007622 



007622 



003660 



007622 



5$ 



007734 
011540 
010034 



010034 



JSR R5.TXCHAR 

321 

8. 

BCC .#8. 

ERROR 

ESCAPE SUB 



JSR 
000 
8. 

BCC 

ERROR 



R5.TXCHAR 



.♦8» 



ESCAPE sue 



.WORD L 10045-. 



{LOAD 32KDATA2), TX 123CDATA1) 



I BR IF NU ERROR 
{REPORT STACKED ERROR 

I SKIP TO END OF TEST 



{LOAD 000CDATA3), TX 32KDATA2) 



iBR IF NO ERROR 
tREPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
♦ WORD 



TRAP 

TRAP 
.WORD 



CSERROR 

CfESCAPE 
L10045-. 



CJERROR 

C$ESCAPE 
L10045-. 



JSR 


R5.WRITEI 


{CHANGE BIT LENGTH OF FINAL CHAR 




PCR 








000 




}+* HOLE FOR RX/TX CHAR LENGTH ** 




JSR 


R5.TXCHAR 


{LOAD 377(DATA4)j TX 000CDATA3) 




377 
8. 




* 

{ 




BCC 


. #3. 


{BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C* ERROR 


ESCAPE 


sue 


{SKIP TO END OF TEST 








TRAP 


CiESCAPE 






.UORD 


L10045-. 


JSR 


R5.TXCTRL 


jTX DATA4 (ONLY 4 OF BITS SPECIFIED IN 




IE Oh 




; R4 WILL GET TRANSMITTED) » SOME OF THE 


16. 




j CRC CHARACTER 




JSR 


R5.STEPLU 


jTX REMAINING CRC CHAR ♦ PUT SOME EXTRA 


BITS 


32. 




lON THE FIFO 




JSR 


R5.RXCHAR 


{READ C CHK 123CDATA1), RCV 32UDATA2) 




RXS0MJ123 


: 6 CHECK RSOh-1 




NOCRDA 








BCC 


.♦8. 


iBR It NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C*ERROR 


ESCAPE 


SUB 


{SKIP TO END OF TEST 








TRAP 


CSLSCAPE 






.WORD 


L 10045 -. 


JSR 


R5 :XCHAR 


{READ/CHECK 321CDATA2) ,RCV 000CDATA3) 




321 









NOCRDA! 


INCRACT 







SEQ 0154 



•112 
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6062 


033670 


103003 




6063 


033672 








033672 


104460 




6064 


033674 








033674 


104410 






033676 


000140 




6065 








6066 


033700 


004537 


010034 


6067 


033704 


000000 




6068 


033706 


000000 




6069 


033710 


120000 




6070 


033712 


103003 




6071 


033714 








033714 


104460 




6072 


033716 








033716 


104410 






033720 


000116 




6073 








6074 


033722 


004537 


003534 


6075 


033726 


120401 




6076 


033730 


000000 




6077 


033732 


042737 


177617 


6078 


033740 


006237 


033730 


6079 


C33744 


006237 


033730 


6080 


033750 


006237 


033730 


6081 


033754 


006237 


033730 


6082 


033760 


020437 


033730 


6083 


033764 


001413 




6084 








6085 








6086 








6087 


033766 


010437 


002330 


6088 


033772 


013737 


033730 


6089 


034000 








034000 


104455 






034002 


000062 






034004 


016665 






034006 


022264 




6090 


034010 








034010 


104410 






034012 


0OO024 




6091 








6092 


034014 


0O4537 


010034 


6093 


034020 


000001 




6094 


034022 


000000 




6095 


034024 


060000 




6096 


034026 


103003 




6097 


034030 








034030 


104460 




6098 


034032 








034032 


104410 






034034 


000002 




6099 


034036 

034036 








034036 


104403 




6100 


034040 


005204 





033730 



20$ 



002332 



BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.RXCHAR 


000 









NOCRDA: 


tNCRACT 


BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.REAUI 


RDSRH 




000 




BIC 


#177617,20$ 


ASR 


20* 


ASR 


20 $ 


ASR 


201 


ASR 


20* 


CMP 


R4,20$ 


BEQ 


31$ 


ERROR REPORTING GOE 


MOV 


R4.GDArA 


MOV 


20$,BDATA 


GEDF 


EM105.ERR22 



j BR IF NO ERROff 

; REPORT STACKED ERROR 

j SKIP TO END Or TEST 

{READ/CHECK OO0CDATA3) ,RCV DATA4 



TRAP 

TRAP 
.WORD 



jBR IK NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{GET READ STATUS REGISTER 

j** HOLE FOR RDSRH VALUE ** 

{MASK "ABC" VALUE 

{ AND RIGHT JUSTIFY IT 



{IS ASSEMBLED BIT COLNT CORRECT ? 



TRAP 



TRAP 
.WORD 



HERE 



{EXPECTED BIT COUNT 

{ACTUAL C ERRONEOUS) BIT COUNT 



J 



"DEVICE FATAL" ERROR * 50 

TRAP 

,U0«D 

.WOflO 

.WORD 





ESCAPE 


sue 


TRAP 
.WORD 


31$: 


JSR 


R5.RXCHAR 


{READ/CHECK DATA4 (SHORT CHARACTER) 


30$: 


001 



NCRACT! 




;** HOLE TOR DATA4 VALUE ** 




NECRDA 


{DON'T CHECK RECEIVER ACTIVE/FlNAl ROA. 




BCC 


.♦8. 


; BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 

TRAP 




ESCAPE 


SUB 


jSKIP TO END OF TEST 

TRAP 
.WORD 



ENDSUB 



L10045: 



INC 



R4 



{BUMP GENERAL PURPOSE INDEX 



TRAP 



SEQ 0155 



CSERROR 

CiESCAPE 
L10045-. 



C$ERROR 

LjESCAPE 
L 10045 -. 



CiERDK 
50 

EM 105 
ERR22 

C$ESCAPE 
L 10045 -. 



CiERROR 

C$LSCAPE 
1.1004 



j> ~ 



C*ESUB 
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6101 


034042 


020427 


610? 


034046 


001402 


6103 


034050 


000137 


6104 


034054 
034054 






034054 


104401 


6105 






6106 


034056 


377 


6107 


034057 


001 


6108 


034060 


003 


6109 


034061 


007 


6.110 


034062 


017 


6111 


034063 


037 


6112 


034064 


077 


6113 


034065 


177 


6114 






6115 


034066 


000 


6116 


034067 


040 


6117 


034070 


100 


6118 


034071 


140 


6119 


O34072 


200 


6120 


034073 


240 


6121 


034074 


300 


6122 


034075 


340 


6123 







SEQ 0156 





CMP 


R4 , »8 . 




BEG 


. *6 




JMP 


T9.LP 


ENDTST 






TABLR: 


.BYTE 


377 




.BYTE 


001 




.BYTF 


003 




.BYTE 


00/ 




.BYTE 


017 




.BYTE 


037 




.BYTE 


077 




.BYTE 


177 


LNTBL: 


.BYTE 


000 




.BYTE 


040 




.BYTE 


100 




.BYTE 


140 




.BYTE 


200 




.BYTE 


240 




.BYTE 


300 




.BYTE 


340 



ARE WE DONE WITH THIS TEST 

EXIT IE YES 

OTHERWISE 00 THE NEXT COUNT 



L1004Aj 



TRAP 



C5ETST 



Bl. 
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SEQ 01S7 



6125 
6126 

6127 
6128 
6129 

bl30 
6151 
6132 
6133 
6154 
6155 
6156 
6137 
6158 



6139 
6140 



6141 



6142 



6143 
6144 



6145 

6146 
6147 
6148 
614S 
61S0 
6X51 



054076 
054076 
054100 

054100 
054100 
054102 
054104 
054106 
054110 
054110 
054112 
054114 
054116 
054120 
054120 
054122 
054124 
054126 
054150 

054152 

054152 



054152 
054160 
034211 



000015 



000051 
05415? 

160020 
177776 

001051 
054160 
000000 
000674 

002052 
^54211 
OO/OOO 
0O00O4 
00O007 



104 
104 
104 



105 
105 
105 



.SBTTL HARDWARE PARAMETER CODING SECTION 



\/////////////// /////////////. '/////////////////' ///////////////////////////// 

>/ THE HARDWARE PARAMETER COOING SECTION CONTAINS MACROS 

»/ THAT ARE USED BY THE SUPERVISOR TO BUILD P TABLES, THE 

,/ MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

1/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. 1ME 

j/ MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMLNICAT IONS 

1/ WITH THE OPERATOR, 

j //////////////////////////////////////////////////////////////// /////////// 



BGNHRD 



GPRMA ADORES ,0,0, 160020 , 177 776 , YbS 



GPRMA VECTOR , 2 , , , 674 , YES 



GPRMO PRIRTY, 4, 0,7000,4,7, YES 



L SHARD: 



.WORD L 10046 -LtHARD/2 



ENDHRD 



LIQ04&: 



.WORD 

.WORD 
.WORD 
.WORD 

.WORD 
.WORD 
.WORD 
.WORD 

.WORD 
.WORD 
.WORD 
.WORO 

.WORD 



.EVEN 



TICOOE 
ADORES 
TILOI.IM 
T*HlLlM 

TICOOE 
VECTOR 
TILOLIM 
TIHILIM 

TVCOOt 

PRIRTr 

7000 

1IL0LIM 

TIHILIM 



.NLIST BEX 



126 ADORES 

126 VECTOR 
126 PRIRTY 

.LIST QEX 

,EVEN 



.ASCI/ /DEVICE CSR ADDRESS : / 
.ASCI/ /DEVICE VECTOR ADDRESS : / 
.ASCIZ /DEVICE PRIORITY LEVEL I / 
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SEO 0158 



6155 
6154 

6155 

615b 
6157 

615a 

6159 
6160 
6161 
6162 
6163 
6164 
6165 



6166 
6167 



.SBTTL SOFTWARE PARAMETER CODING SECTION 



034242 
034242 
034244 

034244 

034244 



OOOOOO 



l///////////////////////////////////////////// ////////////////////////// 

\' 

!/ 
1/ 
\/ 
|/ 



THE SOFTWARE PARAMETER COOING 5ECTI0N CONTAINS MACROS 
THAT ARE USED BY IHE SUPERVISOR TO BUILD P- TABLES. THf 
MMCROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMlNICAT IONS 
WITH THE OPERATOR, 



BGNSFT 



ENDSFT 



Li SOFT 



L10047: 



.WORD 1.10047. LIS0FT/2 



.EVEN 



I) IS 

CNDMOAO OMV11 LlNt liNH DIAG2 MACRO M1200 ;-V FFH 84 1T>j 39 PAGF / 7 
****** PATCH AREA FOR DEBUG *♦*♦*+ 

.SHTTl. ** + *♦♦ PATCH AREA FOR DEBUG 

PATCH: 

. •. ♦lOO 

NOP 
NOP 

NOP 

1*****************************4**4+ 

.SBTTL "FNDMOD" STATEMENT 
ENOMOP 



6169 






6170 






6171 


034244 




617? 




034544 


6173 


034344 


000240 


6174 


034 346 


000240 


6175 


034350 


000240 


6176 






6177 






6178 






6179 






6180 


034352 




6181 






618.? 






6183 


034352 






034352 


OOCOOO 




034354 


000000 




034356 




6184 






6185 




000001 



.SBTTL 

I tLASTs: 

♦ END 



"LASTAD" STATEMENT 6 END OF PROGRAM 
LA5TAD 



EVEN 

WORD 
WORD 



r iEQ 01V* 
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ABC 

ADORES 

ADPAT 

ADR 

AD .HIT 

AD . OK 

APA 

APAD 

ASSEMB 

BADDAT 

BDATA 

BORATE 

BITO 

BITOO 

BITOl 

BITO,? 

BIT03 

BIT04 

B1T05 

BIT06 

BIT07 

BI708 

BIT09 

BIT1 

BITIO 

BIT11 

BIT12 

BIT13 

BIT14 

BITIS 

BIT? 

BIT3 

BIT4 

BITS 

BIT6 

BIT7 

BIT8 

BIT9 

BOE 

BRDTYP 

BSELO 

BSEL1 

BSELIO 

B5EL11 

BSEL12 

BSEL13 

B5EL14 

BSEL15 

BSEL16 

BSEL17 

BSEL2 

BSC13 

BSEL4 

BSEL5 

BSEL6 

BSEL7 

BSRO 



000160 

034132 

030224 

000020 

024332 

024326 

000200 

100000 

000010 

002372 

002332 

002S00 

0O0001 

0O0001 

000002 

000004 

000010 

0O0020 

000040 

000100 

000200 G 

0O0400 G 

001000 

0O0002 

002000 

OO40OO 

010000 

020000 

O40OOO 

100000 

000004 

OOOOIO 

000020 

000040 

0O0100 

000200 

0004 OO 

001000 

000400 

002474 

002422 

002424 

002442 

002444 

002446 

002450 

002452 

002454 

002456 

002460 

002426 

002430 

002432 

002454 

002436 

002440 

002206 
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BSR1 


002210 


CIETST' 


000001 


EM2S 


014347 


BSR10 


002226 


CJEXIT- 


000032 


EM26 


014375 


BSR11 


002230 


CIGETB' 


000026 


EM27 


014427 


BSR12 


002232 


C$GETW- 


000027 


FM28 


014460 


BSR13 


002234 


CIGMAN- 


000043 


EM29 


014501 


B5R14 


002236 


CiGPHR- 


000042 


EM3 


014115 


BSR15 


002240 


CIGPLO' 


000030 


F.M30 


014516 


BSR16 


002242 


C*GPRI« 


000040 


EM31 


014537 


BSR17 


002244 


CIINIT" 


000011 


FM32 


014554 


BSR2 


002212 


CIINLP" 


000020 


EM33 


014603 


BSR3 


002214 


CIMANI- 


■ 000050 


EM34 


014626 


B5R4 


002216 


C*MEM « 


0OO031 


EN35 


014654 


BSR5 


002220 


CIMSG ■ 


■ 0OO023 


EM36 


014675 


BSR6 


002222 


CtOPEN' 


- 000034 


EM39 


014712 


BSR7 


002224 


CIPNTB 


• 00O014 


EM4 


014141 


CARTER- 


0O0100 


C$PNTF« 


- 000017 


EM40 


014734 


CA1CTL- 


0O0001 


CIPNTS' 


■ 000016 


EM41 


014752 


CA2CTL- 


000016 


CIPNTX- 


• 000015 


EM42 


014773 


CB1CTL- 


000020 


CIQIO * 


• 000377 


EM43 


015010 


CB2CTL- 


000340 


CIRDBU 


■ 000007 


EM44 


015035 


CHKTSO 


007042 


CIREFG' 


■ 000047 


EH45 


015062 


CHPTYP 


002404 


CiRESE' 


• 000033 


EM47 


015107 


LKRACT 


005622 


CIREVI- 


- 000003 


EM48 


015142 


CKROA 


0O6122 


CIRFLA 


■ 000021 


EM49 


015175 


CKROR 


006422 


CIRPT ■ 


■ 0OO025 


EM5 


014156 


CKRSA 


006262 


CISEFG- 


■ 0O0046 


EM50 


015234 


CK5E0M 


006562 


CISPRI' 


• 000041 


EM51 


015270 


CKTACT 


005462 


CISVEC- 


• 000037 


EM54 


015330 


CKTBMT 


005762 


CiTPRI 


• 000013 


EM6 


014206 


CKUSTS 


005356 


DOCMP 


• 040000 


EM60 


015352 


CRCOS - 


0O040O 


DEVMAP 


002410 


EM65 


015366 


CRC16 - 


001400 


DEVPTR 


002412 


EM66 


015406 


CTS 


OOOOIO 


DFPTBL 


002154 G 


EM67 


015425 


CIAU « 


OO0052 


DIAGMC 


- OOOOOO 


EM68 


015500 


CtAUTO' 


000061 


DOTBMT 


- 000007 


EM69 


015527 


CIBRK ■ 


0O0022 


DTR 


- OOO020 


EM70 


015545 


CIBSEG" 


000004 


DTRL 


- OOOOOO 


EM71 


015567 


ciBsue- 


000002 


D.BUG 


• OOOOOO 


EM72 


015605 


CICEFG- 


0O0045 


EF.CON 


• 0O0036 G 


EM73 


015627 


CICLCK- 


000062 


EF . NEW 


• 000035 G 


EM74 


015644 


OCLEA- 


• 0O0012 


EF.PWR 


■ 0O0034 G 


EM75 


015665 


CICLOS- 


• 000035 


EK.RES 


• 000037 G 


EM76 


015701 


CICLP1- 


000006 


EF.STA 


■ 0OO040 G 


EM7 7 


015721 


CICVEC" 


■ OO0036 


EIAV3S 


• OO0002 


EM7fl 


015735 


CIDCLN* 


- 000044 


EMI 


014007 


EM79 


015755 


C*DOOU« 


• 000051 


EM100 


016422 


EM80 


016011 


CID«PT« 


• 0O0024 


EM101 


016442 


EMfll 


016031 


CIDU ■ 


■ 000053 


EM102 


016466 


EM82 


016055 


CIEDIT- 


• 0OO003 


EM103 


016530 


EMM 


016112 


CIEROf- 


- OO0055 


EM104 


016607 


EM84 


016141 


CIERHR- 


• 000056 


EM105 


016665 


EM85 


016156 


CSERRO« 


• OOO060 


EM106 


016735 


EM86 


016172 


CIERSF 


• OOO054 


EM13 


014236 


EM87 


016213 


CiERSO' 


• 000057 


EM14 


014265 


EM88 


016233 


CIESCA 


■ OOOOIO 


EM15 


014301 


EM89 


016256 


C*FSEG« 


• 0O0005 


EM16 


014327 


EM90 


016300 


CIESL6' 


• 000003 


EM2 


014046 


EM91 


016331 



SEQ 0160 



EM92 

ENDFMB 

ENOIT 

ENOPAT 

ENOTRN 

ERRBLK 

ERRFLG 

ERRMSG 

ERRN6R 

ERR0R1 

ERRTYP 

ERR10 

ERR1U 

ERR12 

ERR12* 

ERR13 

ERR20 

ERR21 

ERR22 

ERR4 

ERR4* 

ERR5* 

ERR7A 

EVL 

EVRC 

EXADD 

EXCON 

EXECUT 

EIENO 

EILOAD 

FLGCA1 

FLGCA2 

FLGCB1 

FLGCB2 

Fl.GIRQ 

FLGSR 

FLGT1 

FLGT2 

FMT10 

FMT10A 

FMT11 

FMT12 

FMT13 

FMT14 

FMT15 

FMT15A 

FMT16 

FMT16A 

FMT17 

FMT17A 

FMT17B 

FMT17C 

FMU9 

FMT2 

FMT21 

FM122 

FMT23 



016366 
011564 
024212 
003031 
011456 
002204 
002354 
002202 
002200 
002402 
002176 
021540 
023122 
021714 
023454 
022030 
022146 
022204 
022264 
021274 
022376 
022724 
021420 
000004 
002400 
0OO020 
OOOOIO 
000005 
002100 
0OO035 
0OOO02 
000001 
0OOO20 
OOOOIO 
0O0200 
00OOO4 
000100 
000040 
012226 
012302 
012323 
012342 
012351 
012417 
01243* 
012466 
012540 
012563 
012625 
012704 
012765 
013040 
013120 
011574 
013151 
013161 
013203 
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SEQ 0161 



FMT24 


013262 


FMT25 


013275 


FMT26 


013325 


FMT27 


013360 


FMT28 


013367 


FMT29 


013423 


FMT3 


011631 


FMT30 


013430 


FMT3I 


013465 


FMT32 


013533 


FMT39 


013565 


FMT4 


011715 


FMT4A 


011753 


FMT4B 


012006 


FMT4C 


012013 


FMT40 


013616 


FMT5 


012046 


FMT5A 


012111 


FMT50 


015662 


FMT51 


013725 


FMT7 


012176 


FRSIIM 


002374 


F$AU » 


000015 


F$AUTO> 


' 0OO020 


F$BGN > 


• 000040 


FICLEA* 


« 000007 


FIDU - 


■ 0OO016 


FIEND < 


• 000041 


FIHARD* 


■ 000004 


FIHW ■ 


■ 000013 


FIINIT' 


• 000006 


FIJMP > 


■ 000050 


FIMOO " 


■ 000000 


FiMSG ■ 


■ 000011 


FIPROT' 


■ 000021 


FIPUR ■ 


■ 000017 


FIRPT » 


* 0OO012 


FISEG » 


• 000003 


FISOFT' 


- 000005 


FISRV 


* 000010 


FISUB ■ 


- 0OO002 


FiSU - 


- 000014 


FITEST' 


■ OOOOOl 


GDATA 


002330 


GETBSR 


003772 


GETPRtl 


024056 


GETURS 


004326 


GETVRS 


004426 


GETUSR 


0O4134 


GOOOAT 


002370 


GICNTO 


■ 000200 


GIDELM 


■ 000372 


GIDISP 


• 000003 


GIEXCP 


• 000400 


GIHILI 


« 000002 


GILOLI- 


• OOOOOl 


G$NO 


• 000000 



GIOFFS- 

GiOFSI- 

GIPRMA 

GIPRMO 

GIPRHL 

GIRADA 

GIRADB 

GIRADD 

GIRADL 

GIRADO 

GIXFER 

GiYES 

HOX 

HELP 

HOE 

IBE 

IDLE 

IDLES 

IDU 

1EI 

IEO 

IER 

ILOOP 

INIDMV 

INITRN 

INITT1 

INITT2 

INTFLG 

INTGRL 

INTSC 

ISR 

IXE 

IIAU 

I $ AUTO 

IICLN 

IIDU 

IIHRD 

IIINIT 

unoo 

IIMSG 

IIPROT 

IIPTAB 

IIPUR 

IIRPT 

IISEG 

IISETU 

IISFT 

IISRV 

IISUB 

IITST 

JUMP 

LNTBL 

LOADAT 

LOE 

LOGDEV 

LOOP 

LOT 



000400 
000376 
OOOOOl 
000002 
000000 
000140 
000000 
00OO4v, 
000120 
000020 
000004 
000010 
000004 
000000 
100000 
010000 
000010 
004000 
000040 
OOOOOl 
000020 
020000 
027542 
005344 
007324 
004502 
004702 
002352 
OOOOOl 
000200 
000100 
004000 
000041 
000041 
000041 
000041 
000041 
0O0041 
000041 
000041 
000040 
0O0041 
000041 
000041 
0O0041 
000041 
000041 
000041 
000041 
000041 
000167 
034066 
002366 
040000 
002340 
030240 
000010 



G 



LUSWI1 


002470 




LUSUI2 


002472 




LU1M0D 


002000 


G 


LIACP 


002110 


G 


LI APT 


002036 


G 


LIAU 


024346 


G 


LIAUT 


002070 


G 


LIAUTO 


024214 


G 


LICCP 


002106 


G 


LICLEA 


024340 


G 


LICO 


002032 


G 


LIDEPO 


002011 


G 


LIDESC 


003252 


G 


LIDESP 


002076 


G 


LIDEVP 


002060 


G 


LIDISP 


002124 


G 


LIDLY 


002116 


G 


LIDTP 


002040 


G 


LtDTYP 


002034 


G 


LIDU 


024342 


G 


LIOUT 


002072 


G 


LIDVTY 


003232 


G 


LIEF 


002052 


G 


LIENVI 


OO2044 


G 


LIERRT 


002176 


G 


LIETP 


002102 


G 


LIF.XP1 


002046 


G 


LIEXP4 


0O2064 


G 


LIEXP5 


002066 


G 


LIHARO 


034100 


G 


LIHIME 


OO2120 


G 


LIHPCP 


002016 


G 


LIHPTP 


002022 


G 


LIHW 


002154 


G 


LilCP 


002104 


G 


LIINIT 


023644 


G 


LILAOP 


002026 


G 


LILAST 


054356 


G 


LILOAO 


002100 


G 


LILUN 


0O2074 


G 


LIMREV 


002050 


G 


LINAGE 


002000 


G 


LIPRIO 


002042 


G 


LIPROT 


023636 


G 


LIPRT 


002112 


G 


LIREPP 


002062 


G 


LIREV 


002010 


G 


LtSOFT 


034244 


G 


LISPC 


002056 


G 


LISPCP 


002020 


G 


LI5PTP 


002024 


G 


LI5TA 


002030 


G 


LISU 


002176 


G 


LITEST 


002114 


G 


LITIML 


002014 


G 


LiuNir 


002012 


G 


L10000 


002174 





L10001 

L 10002 

L 10003 

L 10004 

L 10005 

L 10006 

L. 1000 7 

L10010 

L10011 

L10013 

L10014 

L10015 

L10016 

L10017 

L 10020 

L10021 

L 10022 

L 10023 

L 10024 

L10O25 

L 10026 

L10027 

L10030 

L10031 

L10032 

1.10033 

L10034 

L 10035 

L10036 

L10037 

L10040 

L10041 

L10O42 

L. 10043 

L 10044 

L10O45 

L10046 

L10O47 

HCLR - 

MOMROY- 

MLWRI 

MPCSR 

MPIVEC 

MPOVEC 

MPRIOR 

HROY - 

MREQ - 

MSTCLR 

NCRACT- 

NCTBMT- 

NEULIN 

NEWST 

NFCRDA- 

NOCHK - 

NOCRDA- 

NOLOQP* 

NOLP 



002176 
021416 
021536 
021712 
022026 
022144 
022202 
022262 
022350 
024212 
024330 
024 340 
024344 
024346 
025254 
024 704 
025252 
026066 
025560 
026064 
026660 
026372 
026656 
027516 
030222 
030220 
030726 
030724 
032072 
032712 
032420 
032710 
033154 
033416 
034054 
034036 
034132 
034244 
OOO100 
OOO040 
003670 
002422 
002462 
0O24M 
002466 
000200 
OOOOOl 
003320 
020000 
000200 
011571 
024036 
040000 
003400 
100000 
001000 
030724 



NORXF.N* 


04000C 


NULCLK- 


000200 


NWSAR 


027546 


OLOOP 


027526 


OVRC - 


002000 


OIAPTS- 


000000 


0*AU - 


OOOOOl 


OtBGNR- 


OOOOOO 


OIBGNS- 


000000 


OIDU - 


OOOOOl 


OIERRT- 


OOOOOl 


OIGNSW- 


OOOOOO 


OIPOIN- 


OOOOOl 


OISETU- 


OOOOOO 


PALF.NB" 


OOOOOl 


PATCH 


034244 


PATE 


002602 


PATF 


0O2612 


PATG 


002622 


PATI 


OC26 76 


PATJ 


002737 


PATK 


002747 


PATL 


0027 70 


PATQ 


003011 


PATQ6 


003021 


PATX1 


0O2651 


PBLENB* 


000002 


PCR 


120407 


PCSARH- 


120405 


PCSARL- 


120404 


PNT 


001000 G 


PRESET- 


OOOOOl 


PRI 


002000 G 


PRIOR 


002346 


PRIRTY 


034211 


PRIOO - 


OOOOOO G 


PRI01 - 


0O0O40 G 


PRI02 - 


0O0100 G 


PRI03 - 


000140 G 


PRI04 - 


000200 G 


PRI05 ■ 


000240 G 


PRI06 - 


000300 G 


PRI07 ■ 


OO0340 G 


PROTO - 


0O0100 


PSTACK 


002344 


RA8GA - 


000OO4 


RAMAO«- 


001000 


RCVBUF 


003032 


RCVDAT* 


0O0002 


RCV1ST 


011310 


RDA 


0OO200 


RDSRH • 


120401 


RDSRL - 


120400 


READ 


003422 


READI 


003534 


REDBTT 


002362 


REDDAT 


002522 



CNDMOAO DMVU LINE UNIT DIAG2 
SYMBOL TABLE 



REDLOO 


OOOOOl 


REDPAG* 


000003 


REGNUM 


002342 


REGO 


002532 


REG1 


002534 


REG? 


002536 


REG3 


002540 


REG4 


002542 


REG5 


002544 


REG6 


002546 


REG 7 


002550 


REOM * 


000002 


RERCHK- 


OOOOOl 


RERR - 


000200 


RETADR 


002360 


RING - 


000200 


ROR 


OOOOIO 


RSA 


000020 


RSOM - 


OOOOOl 


RSTCHK 


005052 


RTSND - 


OOOOIO 


RUN 


000200 


RXABGA- 


0020OO 


RXACT * 


000040 


RXCHAR 


010054 


RXDL » 


000007 


RXEN - 


000100 


RXEOM » 


OOIOOO 


RXERR - 


100000 


RXOR - 


004000 


RXSOM * 


000400 


SAVE4 


002376 


SAVE6 


002400 


SAVLEN 


002406 


SCRACH 


002336 


SECAD - 


0OO02O 


SECADR* 


010000 


5ELO 


002422 


SELIO 


002442 


SEL12 


002446 


SEL14 


002452 


SEL16 


002456 


SEL2 


002426 


SEL4 


0024 32 


SEL6 


00^436 


SERIAL 


007202 


SETVIA 


005252 


SFPTBL 


002176 


STR 


OOOOOl 


SPEED - 


OOOG20 


sRnooe- 


000034 


STALL 


004324 


STARES 


002416 


STARST 


024026 


STEPLU 


011540 


STRIP - 


000040 


STRIPS- 


020000 
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STRTML= 


000301 


TXTNP 


020703 


TXT3 


017207 


STUREG 


004216 


TXTNPT 


021232 


TXT4 


017237 


SUBRPC 


002350 


TXTNPO 


020710 


TXT4A 


01727 7 


SVCGBL- 


000000 


TXTNP1 


020720 


TXT5 


017340 


SVCINS' 


• OOOOOl 


TXTNP2 


020730 


TXT6 


017342 


SVCSUB- 


- OOOOOl 


TXTNP3 


020740 


TXT7 


017365 


SVCTAG' 


• OOOOOl 


TXTNP4 


020755 


TXT/A 


01/455 


SVCTST- 


• OOOOOl 


TXTNP5 


020772 


TXT8 


017545 


SWPBOT' 


- 121000 


TXTNP6 


021007 


TXT9 


017565 


SWPDDC- 


■ 121400 


TXTNP7 


021023 


TXU 


000002 


SYNCH ■ 


000226 


TXTNP8 


021037 


TIARGC- 


000005 


S$LSYM« 


010000 


TXTNU 


020355 


TICOOE- 


002032 


TAB 


■ 000OO4 


TXTUR 


021053 


TiERRN- 


0OOO62 


TABLR 


034056 


TXTURT 


021254 


TiEXCP- 


OOOOOC 


TBMT ' 


■ 000100 


TXTURO 


021066 


TIFLAG- 


000040 


TCCHEK- 


- 100000 


TXTUR1 


021074 


T$GMAN- 


oooooo 


TDATA 


002326 


TXTUR2 


021102 


TiHILI- 


000007 


TDSRH . 


■ 120403 


TXTUR3 


021110 


T$LAST« 


OOOOOl 


TDSRL • 


' 120402 


TXTUR4 


021116 


TILOLI- 


000004 


TDSRNR 


002601 


TXTUR5 


021125 


TILSYM- 


• 01OOO0 


TEOM - 


' 000002 


TXTUR6 


021134 


TILTNO- 


0OOO13 


TERR ' 


• 000200 


TXTUR7 


021140 


T$NEST« 


177777 


TGA 


< OOOOIO 


TXTVR 


020556 


TINSO > 


• OOOOOO 


TIMFLG 


002356 


TXTVRA 


020654 


TiNSl - 


000005 


TM - 000004 


TXTVR6 


020657 


T$NS2 - 


» 000002 


TMPO 


002552 


TXTVRC 


020663 


TINS3 - 


000003 


TMP1 


002554 


TXTVRO 


02066 7 


TIPTNU- 


• OOOOOO 


TMP2 


002556 


TXTVRE 


020673 


TISAVL' 


• 177777 


T!*>3 


002560 


TXTVRF 


020677 


TISEGL' 


• 177777 


TMP4 


002562 


TXTVRT 


021170 


TISEKO- 


• 01OOO0 


TMP5 


002564 


TXTVRO 


02O574 


TISUBN- 


■ OOOOOl 


THP6 


002566 


TXTVR1 


020600 


T$TAGL« 


■ 177777 


TMP7 


002570 


TXTVR2 


020604 


TITAGN' 


- 010050 


TSO 


■ OOOOIO 


TXTVR3 


020611 


T*TEMP' 


• OOOOOO 


TSOM 


• OOOOOl 


TXTVR4 


020616 


TtTEST- 


• 000013 


TSTCON 


002476 


TXTVR5 


020623 


TITSTM' 


• 177777 


TSTNUM 


002420 


TXTVR6 


020630 


TITSTS" 


• OOOOOl 


TTLOOP 


• 000002 


TXTVR7 


020635 


T$$AU ■ 


• 010017 


TXA8 


■ 0O20OO 


TXTVR8 


020642 


TMAUT« 


■ 010014 


TXACT 


• 000004 


TXTVR9 


02064 7 


TIICLE- 


■ 010015 


TXCHAR 


007622 


TXT1 


017005 


T$*DU ■ 


• 010016 


TXCTRL 


007734 


TXT10 


017605 


TMHAR" 


■ 010046 


TXOL 


• 000340 


TXT11 


017625 


TMHU • 


■ 010OO0 


TXEN 


- 000040 


TXT11A 


017677 


TMINI- 


■ 010013 


TXEOfl 


• OOIOOO 


TXT11B 


017735 


TMMSG 


• 010011 


TXERR 


- 10C000 


TXT12 


020005 


TMPRO' 


• 010012 


TXGA 


• 004000 


TXT13 


02O033 


T$$SEG' 


• 010000 


TXSOM 


- 000400 


TXT14 


020050 


TilSOF 


- 010047 


TXTMLT 


021146 


TXT15 


020106 


TMSUB' 


• 010045 


TXTMLO 


020357 


TXT16 


020150 


TMSU ■ 


• 010001 


TXTML1 


020.363 


TXT17 


020163 


TMTES 


- 010044 


TXTML2 


020377 


TXT18 


020220 


T.EDF • 


• OOOOOl 


TXTML3 


020414 


TXT19 


020261 


T.EHRD 


■ 000002 


TXTM1.4 


020436 


TXT2 


017043 


T.ESF 


■ OOOOOO 


TXTML5 


020457 


TXT2A 


017105 


T.ESFT 


• 0*10003 


TXTML6 


020507 


TXT2B 


017144 


T01TBL 


0.7.66? 


TXTML7 


020521 


TXT20 


020315 


Tl 


024350 



SEQ 0162 



T1M00E- 


000300 




Tl.l 


024350 




T1.2 


024 706 




T10 


033156 


G 


Til 


033420 


G 


Til. 1 


033430 




T2 


025256 


G 


T2H00E- 


000040 




T2.1 


025256 




T2.2 


025562 




T3 


0260 70 


G 


T3.1 


026070 




T3.2 


026374 




T4 


026672 


G 


T5 


027520 


G 


T5.1 


027526 




T6 


030232 


G 


T6.1 


030240 




T7 


030730 


G 


T8 


032074 


G 


T8.1 


032074 




T8.2 


032422 




T9 


032714 


G 


T9.LP 


033430 




UAM 


000200 


G 


UMAINT- 


OOOOOl 




UNIT 


002414 




UPBITS 


O02572 




UPEGS 


002246 




USTATR- 


122000 




USYREG 


002502 




USYRT - 


120400 




VECTOR 


054160 




VIA 


120000 




VIAACR- 


120013 




VIADPA- 


120003 




VIA0P8- 


120O02 




VIAIER- 


120016 




VlfllFR- 


120015 




VIAMS - 


120O01 




VIAORA- 


120017 




VIA0R8- 


120O00 




VIAPCR- 


120014 




VIASR - 


120012 




VIAT1A- 


120004 




VIAT1B- 


120005 




VIATIC- 


120006 




VIAT1D- 


120007 




VIAT2A- 


120010 




VIAT2B- 


120011 




VREGS 


O02266 




UAIT50 


005236 




URIBYT 


002364 




WRILOC- 


000002 




WRIPAG- 


OO0004 




URITE 


003646 




WRITEI 


003660 
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SYMBOL TARLE 



WSRO 
WSRIO 
WSR12 
WSR14 

. AB5. 



002206 
002216 
002220 
002222 



WSR16 
WSR2 
WSR4 
WSR6 



034356 

000000 
ERRORS DETECTED 



000 
001 
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002224 
002210 
002212 
002214 



XDATA 002334 

XORGB 022352 

XYZ » 000007 

X$ALWA= 000000 



XJFALS- 000040 

XfOFFS- 000400 

XfTRUE* 000020 

*E * 000062 
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SEQ 0163 



JI.STIN- 000001 
U.STTA- 000001 
*T - 000013 



CNDMOAO OMV11 LINE U 



Bl 
CI 
Dl 
El 
Fl 
Gl 
HI 
II 
Jl 
Kl 
LI 
Ml 
Nl 



B5 
C5 
D5 
E5 
F5 
G5 
H5 
15 
J5 
K5 
L5 
M5 
,N5 



.B9 
.C9 
.0^ 
.E9 
,F9 
.G9 
.H9 
.19 
.J9 
.K9 
.1.9 
.M9 
.N9 



,.B13 
,.C13 
..D13 
..E13 
..F13 
..G13 
,,H13 



B2 
C2 
02 
E2 
F2 
G2 
H2 
12 
J2 
K2 
L2 
,M2 
N2 



B6 

C6 
06 
E6 
F6 
G6 
H6 
16 
»k> 
Kb 
Lo 

,N6 



. .BIO 
. .CIO 
. .D10 
. .E10 
. .F10 
. .G10 
. ,H10 

..no 

..J10 
. .K10 

..LiO 
. .M10 
. .N10 



B3 

C3 
03 
E3 
F3 
G3 
H3 
13 
J3 
,K3 
L3 
M3 
,N3 



B7 

C7 
07 
E7 
F7 
G7 
H7 
17 
J7 
K7 
L7 
M7 
N7 



. .Bll 

. .Cll 
. .Dll 
..Ell 
. .Fll 
. .Gil 
..Nil 
..111 
. .Jll 
..Kll 
..1. 11 

. ,ra\ 

..Nil 



B4 

C4 
04 
E4 
F4 

G4 
K4 
14 

. J4 
K4 

,L4 
,H4 
,N4 



.ce 

.08 
.E8 
.F8 

.G8 
.Hfl 
.18 

. J8 
.K8 
.L8 

♦na 



.812 
.C12 
.012 
.E12 
.F12 
.G)2 
.H12 
.112 
.J12 
.K12 
.L12 
.Mi2 
MX2 



